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Editorial 


SOFTEX has now published 5 issues in just over 12 months. Because of the amount of time 
required to produce one magazine, bearing in mind that this is only an after hours activity, we will 
in future be aiming at quarterly issues rather than bi-monthly. This has no effect on = any 
subscribers as subscriptions were on a per issue basis, rather than annual. 


As our subscriber base has increased improvements have been made to each issue to try and 
improve the quality of the magazine. This month we introduce a supplement for the increasing range 
of hardware and software we are stocking. We would like to thank all those who have supported us in 


our retailing over the last year and promise to continue increasing the range of goods for sale in 
the future. 


On the back page of this issue you will find a subscription renewal form for the next 6 issues 
and urge you to complete this and forward it to us. Like all businesses we will have to _ evaluate 
the response received to decide on the future of this magazine. If enough support is not 
forthcoming then we will have to reconsider the future very carefully. 


It is now nearly 15 months since Texas Instruments pulled the plug on the TI-99/4A, but it is 
still possible to purchase a new computer in places for $199.00. Since then several other computers 
have left the scene, but even those surviving are not selling at anywhere near the rate they were 12 
months ago. 


For a while it looked as if every one had deserted the 99/4A, with 'Home Computer Magazine' and 
Software companies virtually ceasing to cater for user's needs. In recent months this situation has 
changed and at last TI owners’ everywhere can _ boast of excellent business type software. New 
programmes available include Data Base Management, Spelling Auto-checker, Console Writer and 
TI-COUNT. CorComp has finally begun shipping the long promised Expansion System and Double Density 
Controller Cards. Some of the recent game software has begun to show real 3-D graphics to effect, 
with 'TI-Tennis' being one of the best examples seen. 


Apart from the prolific growth of the ‘Professional’ type computer, very little has happened in 
the home computer scene. When studying today's 'new computers' closely you will discover that your 
99/4A was ‘light years' ahead of the competition and still is in most areas. I don't think the full 
impact of the 99/4A has sunk in yet, and it is only now that the so called ‘experts' are recognizing 
the features it had. 


With’ all this new software around and support available, make sure your 99/4A does not gather 
dust. There are even more interesting developments around the corner which will help to keep_ the 
99/4A alive for years to come. 


Finally, may I wish everyone on _ behalf of my Co-directors a very happy Christmas and a 


prosperous New Year. 
bi) Poon 
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Wayne by Wayne 


Being both a= reader and producer of 
computer magazines, I personally have seldom 
bothered reading "personality" type articles, as 
I'm usually interested in other things. 
However, it seems that people want to know’ what 
we do when we are not playing with our computers 
- that's easy - working and sleeping! 
(Apparently that is mot enough, so I must 
continue. ) 


OK, I'll bare all. I work as a_ Factory 
Manager in the Textile Industry. My original 
qualification is a Science degree, majoring in 
Chemistry. I have worked in the Fertilizer, 
Food, and now Textile Industries for a _ variety 
of employers. Not that I have been any more 
footloose than most, it's just that some of my 
employers have had _ the misfortune to be taken 
over. Whenever I hear politicians talking about 
industry "restructuring" or "rationalization", | 
shudder. I just think of the trail of human 
misery which inevitably follows. I've been 
fortunate; mostly, I've been the one with the 
delightful task of handing out’ the notices. 
Yes, I've been on the receiving end, too, but 
had plenty of time to find another position. 
The Private Sector can be a tough life, but it 
does have its compensations. 


My wife was a School Principal before our 
family came along, and she now’ works_ part-time 
at a Private Girls’ School, to keep her hand in, 
so to speak. She is also doing a M.Ed, but 
more of that later. The children, a girl of six 
and a boy of two, sure have a_ high opportunity 
cost against them! 


I suppose my fascination with my computer 
is partly due to the fact that I spend all day 
with people, talking, cajoling, convincing, 


trying to get the best out of them for all our 
sakes, trying to translate the employee's wants 
into terms acceptable to the Company, and 
vice-versa. Humans are not always logical, and 

I guess it's nice to play with something that is 
always logical. The brain is strange - make it 
work on one problem only, and it goes mad. But 
give it several problems, in completely 
different fields, and it never gets tired. 


My computer is constantly in use, primarily 
as a word processor, for Softex, for my Wife's 
essays, niece's reports, User Group work. It 
does have the occasional game played on it, and 


I do the occasional program because I _ enjoy 
programming. Multiplan gets a go now and again, 
(more so at work), and the new DBM database will 
undoubtedly get a look in. The robustness of 
the computer never fails to amaze me - around 40 
hours a week, week in week out, and never a 
glitch! 


The departure of TI from the home computer 
scene was a tragedy, for the 99/4A is a really 
remarkable machine, begging to be further 
developed. But, when you think of it, what have 
we lost? When I meet people, and tell them I 
have a 99/4A, they invariably say;"But they're 
not made any more, are they?" Well, the answer 
to this is perfectly simple. TI's decision of a 
year ago has not changed my computer's ability 
to do things one little bit. I still don't have 
all the bits and pieces I'd like, such as 
Pascal, CP/M, a double density disk controller, 
two slimline drives mounted in the _ box. With 
all those, and Editor/Assembler, which I have, 
but don't utilize, I could spend years of 
self-education. I think the time to move to a 
new computer will come when the 99/4A_ will not 
do all I want it to. At this point, that seems 
a long way off. 
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Corcomp Expansion System 


By Doug Thomas 


SOFTEX has now received the first part of 
the CorComp 9900 Expansion System, being the 
RS232 card. As yet the 32K and Disk Controller 
portion of this system have not been released in 
the U.S.A., but should be ready by Christmas 
time. 


From the photographs’ enclosed the first 
thing that is very evident is the size, or 
rather lack of size compared to the TI system. 
When the 32K and Disk Controller card becomes 
available it will slot in on top of the circuit 
board shown, with the appropriate output at the 
rear, 


The power pack that comes with the 
Expansion System is almost as large as_ the 
system itself. Provision is made to connect any 
further Peripherals that may be required to’ the 
right side, although this is covered with a 
removeable plate. 


At the rear there is a Centronics and a 


RISK DRIVES ee 
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RS232  ( a second outlet can be obtained by a 
splitter cable ) outlet with provision for the 
Disk Controller. This system will make it very 
easy to carry around compared with the _ TI 
system, but there is no provision for any extra 
cards that may come along, unless another plug 
in device is made. 


A very’ well presented instruction book is 
included, better than TI's, with more technical 
details. 


SOFTEX is planning to have this system for 
sale early in the New Year, with the review 
model being available now for $295.00 (RS232 
only-110 Volt) with the full system expected to 
cost $595.00 plus registered postage of $11.00. 
Future systems imported, expected early January 
will have a 240 volt power supply. 


In conclusion a_ well made product. All 
Disk Drives will need to be’ externally powered 
versions which SOFTEX can sell very 
competitively. 


Sa 
Sail pil 


Using the Corcomp DS/DD Disk Controller 


9900 DISK CONTROLLER 


By Doug Thomas The Disk Controller is the same as TI's 
externally and in installation, although you can 
After months of waiting the CorComp DS/DD now have 4 _ Disk Drives attached. On power up 
Disk Controller has finally arrived, with SOFTEX say goodbye to the familiar TI screen and _ press 
now directly importing them. any key screen as you are greeted with a new 
screen that is controlled by the Controller 
As the accompanying photograph shows_ the which reads as follows:- 


controller is encased in a sheet metal cover, 
not as heavy as TI's, and has its Disk Manager 


on Disk. The version Softex has is V2.2, as the 9900 

2.1 version had some problems. The casing is DISK CONTROLLER 
easily removed by removal of 4 screws and the 

circuit board is exposed as shown in the photo. Press For 

Note the Dip Switch which allows the changing of l Disk Manager 
Disk Drive Head Step Settings. In the case of 2 TI Basic 

older Drives that are noisy, adjusting this will 3 Extended Basic 
quieten your Drives, an extra bonus’ with this 4 


controller. 


Space Bar for Color Bar 


Selection of the Module you wish to use can 
be either by pressing the required number, or by 
pressing the space bar twice. With some modules 
that have their own power up _ routines, eg. 
TEII, Data Base Management, the later method is 
required. When the space bar is pressed once, a 
color bar is shown across the screen. 


The Disk Manager is on Disk and uses 98 
sectors. Pressing '1' for Disk Manager loads 
this program (the system is similar to MS-DOS in 
some ways) and the following screen greets you. 
All screens have defaults set up, and in the 
case of selecting other than the default value 
the option is acted on without the need to press 
'ENTER'. 


ISK MANAGER V 2.2 


Select Option: 1 


1. File Utilities 


iz 


2. Disk Utilities 


LEER L LL LI LIS 


3. Disk Tests 


4. Configure Manager 


Written by Steve Mildon 
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First you need to configure the Manager so 


press 4, This allows you to configure the 
system for your set up and then save this back 
to disk for use until you want to change this 
again. There are 2 screens displayed for this 


option, which are shown below. 


(Any time you 


wish to print anything on the screen during use 
of the Manager just press 'FCTN 0') 
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Configure Manager 


Drive Configuration 


Drive 1 Drive 2 
Tracks/Side : 40 Tracks/Side : 40 
No. Sides ey No. Sides x v2 
Density S/D: D Density S/D: D 
Drive 3 Drive 4 
Tracks/Side : 40 Tracks/Side : 40 
No. Sides 2 No. Sides = 2 
Density S/D : D Density S/D: D 


From To 
Drive No. : 1 Drive No. : 2 


Output Configuration 
RS232 


Screen Color: 5 Text Color : 16 


PRESS CTRL X FOR NEXT PAGE 


Page 2 of 2 


Single Density Interlace : 7 
(1-10) 


Double Density Interlace : 10 
(1-11) 


Enable Turbo Option Y/N : Y 


Save Configuration to Disk Y/N: Y 


PRESS CTRL E FOR PREVIOUS PAGE 


The options for Interlace refer to 
positioning of sectors within tracks on the 
diskette, and can speed up the read write time. 
Turbo Option is for copying freshly initialized 
disks that have no bad sectors, and speeds up 
copying times by turning off the Verify after 
Write command. 
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Selection of 'File Utilities' gives the 


following options:- 


File Utilities 


Select Option: 1 


1. Copy / Rename / Delete 
Change Protection 


2. Load and Run (Assembly file) 
Pressing '1' brings up a screen to_ select 


the Drive required and then the following screen 
emerges:- 


DSK1. TIMP Page 1 of 2 

26 Files Free 241 Used 1199 
CMD Filename Size Type P 
N CHARA! 9 Program U 
N DICT! 242 Dis/Var 80 U 
N DICT2 213 Dis/Var 80 U 
N EDITAI 33 Program U 
N EDITA2 6 Program U 
N FORMA! 33 Program U 
N FORMA2 15 Program U 
N LOAD 11 Program U 
N MANAGER 98 Program P 
N MEDICAL 2 Dis/Var 80 U 
N MPBASE 41 Program U 
N MPCHAR 9 Program U 
N MPDATA 33 Program U 
N MPHLP 158 Int/Fix 128 U 
N MPINTR 33 Program U 
N NAVHELPO 14 Dis/Var 80 U 
N NAVHELP 1 72 Dis/Var 80 U 
N NAVREP 36 Program U 


Turn Page with CTRL E - CTRL X 


This screen allows you to Copy/ Rename/ 
Delete/ and change Protection in one operation. 
No longer do you have to type in file names’ one 
by one. By changing the 'N' under the 'CMD' 
column you can:- 

'C' Copy, 'M' Move (copy to. another disk 
and then delete), 'D' Delete. To change the 
name of the file just type over the Filename 
field. To change protection type under the 'P' 
field:- 

'P' for Protect, 'U' to unprotect, 'T' for 
temporary to  unprotect for filename change and 
then reprotect again. A very useful function . 


A word of warning here, this option must be 
used to copy files onto a Disk containing other 
Files as if the Copy Disk option is used in the 
Disk Utilities section those files will be 
overwritten. 


The number '2' option under File Utilities 
allows you to run Assembly Language DIS/FIX type 
files without the Editor/Assembler Module. 


Disk Utilities gives you the following:- at. the same time, particularly useful if you 
only have 1 drive. 


Disk Utilities Disk Utilities 
Select Option: 1. Select Option: 4 
1. Catalog 3. Rename — 1. Catalog 3. Rename 
2. Copy Disk 4. Initialize 2. Copy Disk 4. Initialize 


Disk Utilities 


Select Option: 2 


1. Catalog 3. Rename 


2. Copy Disk 4. Initialize Drive No. : 1 
Disk Name 
From Free Used 
Drive No. : 1 
Disk Name : Tracks/Side : 40 
Free Used No. Sides ae 
Density S/D: D 
To 
See The other option is Disk Tests to test for 
Pree ised ad sectors. 
Disk Tests 
Select Option: 1 
Note: TO Drive Files will be Erased 1. Read only test 


2. Destructive Write and Read test 


The Catalog option is similar to that in 
the File Utilities Copy option, but without the 
'CMD' column. Selection of '2' Copy Disk gives 
you the following screen:- 


In addition there is a Tool Shed Utilities 
built into the Interface which’ gives powerful 
Assembly Language sub-programmes from _ Basic. 
Also on the Manager Disk are 2 files named 
'FORTH' and 'FORTHSAVE' that allows you to Load 
Disk Utilities and Run Tl-Forth from the Files Utilities 
section, and also. allows it to be run from 
Editor/Assembler or the Mini Memory (requires 


Select Option: 2 32K) now. 

1. Catalog 3. Rename Using a DS/DD Drive such as a Chinon F-502 

2. Copy Disk 4. Initialize 1440 sectors or 360K may be stored on each Disk. 
Whilst the _ price for this Card is $295.00 ea., 

From compared with the TI single density version it 

Drive No. : 1 is still a worthwhile investment. In my case | 

Disk Name : TIMP have in excess of 120 D/S_ Disks and by 

Free 241 Used 1199 reformatting them to double density I will have 
some 60 free disks, and at a cost of $4.00 ea. 

To that equals nearly the cost of the controller. 

Drive No. : 2 

Disk Name : SOFTEX26 Those with Disk Manager 2. can use this 

Free 829 Used 611 Module with the controller instead of the 


CorComp Disk if they wish to, and yes the Double 
Density option does operate. 


A well produced Manual containing 82 pages 
plus a 7 page Appendix comes with the 
Controller. The Warranty is for a period of 120 


Initialize Diskette Y/N: N days. 
To initialize a Disk select option '4' or SOFTEX is importing the CorComp Disk 
this can be done from the Copy Disk _ option. Controllers direct and they are _ available at 
When initializing a Disk you also have option to $295.00 ea. plus $8.00 for registered postage. 
have the Disk Manager system put onto the Disk Order yours now as everyone will want one. 
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Software Review 


Data Base 


We all know’ how good programs like 
TI-WRITER and Multiplan are, but one area 
completely missed was a good Data Base program. 
One of the _ first modules produced for’ the 
TI-99/4 computer was P.R.K., which was _ joined 
later by P.R.G., which did a fine job for the 
basic machine, but was very limited in capacity. 


I'm pleased to report that Navarone 
Industries from California have finally produced 
an excellent Data Base Management system for 
those with the full Expansion system, ie. 32K. 
memory, Disk Controller and Drive, RS232 
interface and printer. 


This program uses 1 module called DBM 
Report (although the book calls module 'DBM' 
system), and | Disk. A 36 page instruction book 
is provided to guide you through the program. 
The Disk appears to have the majority of the 
programs on it, including DBM _ Sort which’ was 
reviewed in issue No. 3. 


The program is advertised as _ being a 
customized transaction, filing and reporting 
system for small business. It is written in 
Assembly language so it is very much __ faster, 
more flexible and has more capacity than P.R.K.. 


Complete flexibility is available in 
forming your own files, and the operator does 
not need to know programming language that is 
required setting up more professional programs 
for the PC range of computers. Data bases with 
up to 250 fields with 32000 records (record size 
limited to 255 bytes) can be created. 


On inserting the DBM module and pressing 
any key the screen shows:- 


FOR TI BASIC 

FOR DBM ENTRY 
FOR DBM SETUP 
FOR DBM SORT 
FOR DBM REPORTS 


co wf wD 


Select 3 for setup, and you then enter’ the 
system to create your own format for a Data 
Base, beginning with a blank — screen. After 
deciding what detail you want, eg. Title, First 
Name, Surname etc. you begin by typing in _ the 
name of field, eg. the word 'Title', then with 
the 'FCTN 2! key (Insert), you key in the number 
of required spaces required which is represented 
in a red color on the screen. To shorten’ the 
length of the field the 'FCTN 1' (Delete) key is 
used, and when finished 'ENTER' is pressed and 
the cursor goes to the beginning of the next 
line. Continue entering names and fields as 
above until finished. 


For records of a unique nature, eg. 


Customer number, the record can be defined as a 
'KEY' field, so that inserting the detail in 
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Management 


this field will automatically call up the rest 
of the file. Several 'KEY' fields may be used 
in one file if required. The setup file is then 
saved to disk ready for use. 


Next select DBM ENTRY using the setup file 
name and _ your. previous file structure is 
presented with all the 'KEY' fields being 
emphasized. Entry of Data in the KEY fields 
will recall the _ files quickly. To insert new 
data, the cursor places itself on the first 
field, and after typing the information in and 
pressing 'ENTER! the cursor moves to the next 
field ready for the imput of data. Full editing 
facilities are available in this mode. If the 
field is numeric then data will be automatically 
right justified (defined in setup program). On 
completion, the ENTRY program is left by using 
the 'QUIT' key. 


Data may then be sorted using DBM SORT 
which can. sort files with up to 6 nested sort 
keys. 


DBM REPORT is a_ powerful report program 
that allows you to output information § as 
required. This program will except any DISPLAY 
80 program, eg. a TI-WRITER form letter where 
the data in the base may be _ inserted. If for 
example a membership. list was defined, then a 
mail label can be printed out using portion of 
the field information. Each field from your 
data file can be moved about the screen to’ form 
the layout required, then the field names, and 
the other fields not needed are_ deleted. The 
screen automatically scrolls to 80 characters 
across, line and column No's' can_ be_ displayed 
for guidance. 


Several formats can be selected, for 
numeric fields between 0 and 4 decimal places 
can be shown, the selection of '$' will create 


the output in dollar and_= cent form. By 
selecting 'T' the trailing blanks in the field 
are removed (all fields are stored in_ fixed 


format mode) allowing the printing of adjacent 
fields appear logical, eg. 'Fred Nerk' instead 
of 'Fred Nerk', 


The program is menu driven, has an inbuilt 
'Help' file and comes’ with a Demo program. 
Whilst the above may appear to to make the 
programs somewhat complex, this is not the case. 


It will take time to fully utilize a powerful 
program like this fully, as anything from a 
Inventory, or Invoicing program could _ be 


constructed using this program. 


SOFTEX is importing this program direct and 
it is available for $105.00 plus $5.00 Pack & 
Postage (Registered) if applicable. 


This program is a must for all TI-99/4A 
users and now allows the full business potential 
to be gained from the TI-99/4A. 


AXIOM ParallAx TI Printer Interface 


By Doug Thomas 


Ever since TI produced the Expansion 
Peripheral Box users have not been able to 
interface a printer to their computer cheaply. 


Initially, the old TI-99/4 came with 
'freight train' peripherals that plugged into 
the right hand side of the computer. One of 
these was a RS232 Interface, having 2 RS232 
outputs only, with no access for a_ parallel 
printer. This meant that to run the printer not 
only did you need the TI RS232 interface, but 
also a Printer RS232 interface. 


The Expansion Box version of the RS232 came 
in a card, having outputs for 2 RS232 ports § and 
1 Parallel port. The catch however was that if 
you only wanted a_ printer then the cost was 
high, $200.00 for the Box, and $175.00 (now 
$195.00) for the card. This expense could be 
justified if you intended expanding to the full 
system some time in the future. 


Well at last, a Parallel printer interface 
is available by itself that plugs into the right 
hand side of the computer. This is known as the 
AXIOM ParallAx Interface and sells for $170.00 
through Softex. If you have or _ purchase a 
Expansion Box later’ this can still be used as 
the Interface has a place for the Expansion Box 


cable to plug in at the rear, a good idea as it 
would keep that huge cable out of the way. 


The Interface does require a 6 volt power 
supply (not supplied - a Dick Smith one will do) 
to power the unit unless your printer has a 
250mA 5 volt power supply on pin 18, although 
you do need to modify Jumper 4 inside’ the 
Interface to do this. 


One the good features of the Axiom is that 
it come complete with a 90cm. (3 feet) 
centronics cable attached, ready to plug 
directly into a parallel printer with no mucking 
about. The cable length should be adequate for 
most users, even though Softex always _ supplies 
made up cables 10 feet long to give the user a 
real choice of where he is going to place’ the 
printer. 


A well written instruction book comes with 
the Interface, and even’ outlines modifications 
that can be made to suit special circumstances. 
One bit of confusion arises, ie. whether a 
indepandant power supply is needed or _ not. 
Details of alterations that can be made _ (with 
Soldering iron) include changing of defaults, 
including Device name, CRU _ Base’ Address’ or 
selection of power from AC adaptor/Printer. 
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COMMANDS and FEATURES 


A built-in self-test mode is available when 
the Computer is switched on by holding the Space 
Bar down. This will print out all the 


characters of the printer for as long as_ the 
space bar is pressed. 


The physical dimensions are small, being 
l6cm x 10cm x _ 4,5cm.. A rubber’ cover is 
positioned over the Expansion Box outlet at the 
rear. The unit can be opened up by removing 4 
small screws underneath, giving access to the 
circuit board - see _ photograph with this 
article. 


The usual Printer instructions, '.CR, .LF, 
and .DA' can be software set. Control Code 
instructions to the printer are excepted without 
difficulty. The Left Margin can be set by 
'MA=8' (8 equals characters in), with Line 
Length being set by 'LL=40' (40 chars. wide). 
Spacing between lines can be set by 'LF=2 or 
LF=3, etc.). 


The OPEN statement can specify 'PIO' or 
'AXIOM', the choice being up to the user. In 
the case of some early produced programs by _ TI 
where 'RS232' was the only command specified, by 
changing a jumper lead the interface will accept 
an OPEN #1:"RS232" command and print out on a 
parallel printer. 


The printer cable is wired up as follows:- 


Pin No. Signal. 
1 Strobe 
2-9 Data 1-8 
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10 Not connected 

1] Busy 

16 0 Volts 

17 Shield Ground 

18 Power (if 250mA 
at 5V is available) 

19 Signal Ground 


A well made product, perhaps a little 
expensive, although is complete with no extras 
such as cables required. Does what is required. 
of it with the minimum of fuss, recommended for 
those wanting a printer but have no_ intentions 
of expanding further. 


99/4A AUTO SPELL CHECK 


By Dragonslayer Software. 


TI-writer is a very good  word-processor 
program, but if there is one thing in which it 
has been deficient in comparison to’ others, it 
has been the lack of a spelling checker. | 
expect a lot of readers may be saying to 
themselves "Only illiterate technologists need 
spelling checkers. A properly educated person 
does not need one." Well, there was a time when 
I would have agreed with you. 


However, in the last year or so, I _ have 
written thousands upon thousands’ of words on 
Writer, and it is very difficult to detect all 
spelling and typographical errors, especially in 
a very long text. 


In fact, it does not matter how good a 
speller you are, (though proficiency is a great 
help). It depends on how accurate a typist you 
are, and most of us do not fit that category. 
Most errors are typographical. I would venture 
to suggest that very few of us could do six or 
more pages of text without having errors in it, 
even after a lot of checking. This is where a 
spelling checker is so useful. 


One should realize at the outset that _ if 
you misspell a word in such a way that the 
misspelt word is still a word, you won't, of 
course, find it - eg. "same" could be misspelt 
as "dame", 


The program is accessed through "3." on the 
TI-Writer master screen, whereupon a default 
file "DSKI.UTIL1" appears. Press <enter> and 
the program loads, shows a title screen, and 
then asks for the text filename. You insert the 
appropriate’ disk, tell it the filename, and the 
text is taken up into the computer. It then 
checks the text against its two inbuilt 
dictionaries. This step can take some 
considerable time, up to four minutes a page. 
What happens is that the letters of the alphabet 
are checked one _ by one, and the dictionary in 
use is shown on the top of the screen, together 
with the letter being checked. It runs through 
dictionary one first, then dictionary two. 


It then asks for the filename of the User's 
dictionary, which you _ respond to accordingly. 
As far as Users dictionaries are concerned, you 
are advised that you can have as many as you 
wish, but each should not exceed 16K. Play it 
safe, and limit them to around 60 sectors. The 
text is again checked, and again you are _ asked 
for the User dictionary name. Assuming you have 
finished with your dictionaries, press <enter> 
again, and a multiple choice is _ displayed, 
together with the first word not recognized. 
Your choices are: 


N. Next Word 

P. Previous Word 

C. Change Word 

D. Disregard Word 
V. View in context. 
A. Add to your List 


The first two are for moving through the 
list of words, the next to ignore that word, and 
go to the next. Change word shows the word, and 
asks for correct spelling, which you type in. 


Pressing "A" stores the word for later 
saving into your. dictionary. "vy" is very 
useful, as it allows the word to be displayed 
with six or so words either side of it, as it 
appears in your text. 


When all the words have been dealt with, 
you are then asked for the text filename again, 
(which can be ignored by pressing <enter>), and 
the corrected words will be saved back into your 
text. Be warned, though, for when this is done, 
unless the number of letters is the same as 
before, the line of text is split, similar to 
FCTN 2, insert character, but is not 
reformatted, This is no hassle if your file 
uses the _ fill command, but if it does not, you 
will have to reformat your text before printing 
out. 


You are then asked for the User Dictionary 
filename, and the words you have decided to add 
to your dictionary, will be saved away. This 
can be a very slow process if you have a fair 
sized User Dictionary. The "UPDATING" step can 
take several minutes to be accomplished. 


Now, it is possible to build up a_ User 
Dictionary of approximately two thousand words. 
There is a limit to the size of User 
Dictionaries, probably around 60 sectors, though 
there seems to be no limit on the number of User 
Dictionary files you can _ have. There is 
probably some sort of trade-off between size of 
file and number of files, in the respect of time 
taken to check, 


The two inbuilt dictionaries both occupy 
over 200 sectors on a disk, so a double-sided 
drive comes into its own here. Unfortunately, 
while the User Dictionary can be viewed with 
TI-Writer, it is not possible to do so with the 
inbuilt dictionaries. 


All in all, "99/4A Auto Spell-Check" is a 
most useful addition to TlI-Writer. It is 
available from Softex, and _ price’ is $59.95, 
including post and packing, for two disks and a 
12 page manual, 
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Review of the new Amust Printers 


By Doug Thomas 


The new range of Amust Printers are now on the P88 printer. It includes the rugged 
available, and not’ only are they cheaper than print head mechanism that the P88 had It will 
the earlier models, but they offer more features now take up to 11" width paper, has a 9x11 _ dot 
and are far. better built in the case of the matrix and prints at 100 c.p.s.. The other 
lower range printers. feature is a proportional pitch mode _ (software 


selectable). See specifications enclosed for 


more details. 
SOFTEX SPECIAL for CHRISTMAS $340.00 plus $10.00 
This Printer is a far cry from the original 


registered Post. 


80DT and has several features that were present Sample of Print: 
-MNOPGRSTUVWXYZEI\1*_‘abcdefghijkimnoporstuvwxyz{ ! }~ efi TPP 
INOPQRSTUVWXYZED\I]*_‘abcdefghijkimnopaorstuvwxyz{i}*__ —«—<«#,§! | Li iil-+— 
NOPQRSTUVWXYZEI\]*_ ‘Sabcdefghijkimnoporstuvwxyz{ i} __ ££ 11 iig-+ 44 
AARVEGAEPIAZY WLOPL” °= HS A WOG Oh O0AOPEAAR TAN ORIR |" HB%R? ()¥4+,-./0 
VRVEGPEPISAY WL OOY” °= Ee ee HOS ete /ACREARER SH TSI |b RSE? ()K4+,-./01 
RVEGAEPIAIY HLOPT” 2 = EY WHOS OREO /OFERERSH TOSI | "HERR? ()K+,-./012 
Printing Connectors: Printer side ; 
Method: Sats Amphenol 36-pole connector (female) 
Serial impact dot matrix 57-40360 or equivalent 
Print Rate: Character mode Cable side 
100 characters/sec (pitch 10 CPI) Amphenol 36-pole connector (male) 
Graphic mode 57-30360 or equivalent 
N dots x 700 dots/sec. Standard type connectors (Canon Dsub 
Line Feed 25-pin) ore applicable by using the 
Speed: 100 ms/line (pitch 6 LPI) connector RS-232c (option) 
Character Set: ASCII 96 types + 41 language variations Dimensions: 40)mm(W) x 337mm(D) x 99rmm(H) 
Graphic Mode: Correspondence of dots Weight: 8kg (Approx.) Net 
(Vertical:Horizontal = 1:1] possible) Resistonce: 5 Mohm 
Character Temperature: Operation 5°C to 40°C 
Mode: 9 dots x 5.5dots + sp |.5dots Shipping — 10°C to 60°C 
Graphic Mode: 8 dots x 576 dots/line positions Storage -20°C to 60°C 
Printing Width: 203 mm Humidity: Operation 20% to 90% RH 
Printing Pitch: Fixed pitch mode Shipping 5% to 95% RH 
SCPI 6CPI8.25CPI 1OCPI 12CPI and Storage 5% to 95% RH 
16.5CP\ Audible Noise: 65dB (A FAST) 
Proportional pitch mode Reliability: Printer MCBF 3 million lines 
N x 9 dots MTBF | thousand hours 
Copies: Original + 2 copies MTTRO.5SH unit change 
Capacity: Up to 0.3mm total thickness Head Service 
Paper Feed: Frictiontead Life: Print Head Life: 200 million dots 
Roll paper: 4.5-10 in. (wide) Ink Ribbon Life: 2 million characters 
CUT sheet: 4.5-10 in. (wide) Standard 
Tractor feed Accessories: Ribbon Cartridge: | pce. 
Fanfold paper: 4.5-10 in. (wide) Owners Manual: | pce. 
Ink Ribbon: Exclusive ribbon cartridge Guarantee Card: | pce. 
Size: 13mm x 12m Endless Specification 
Colour: Black hange: The above specifications and exterior 
Feeding Pitch: 1/6. 1/8, n/72 LPI appearance are subject to change without 
Input Power: Both the 100v type version and the 200v notice for improvement purposes. 
type version are available. 
Power 
Requirement: 100v type: 100v +/-— 10%, 
115v +/- 10% 
200v type: 220v +/- 10%, 
240v +/- 10% 
540Hz +/- 2% or 60Hz +/-— 2% 
Power 
Consumption: Operation: MAX. 1OO0W 
Standby: 1 SW 
interface: Parallel Interface 
Centronics standard, completely 
compatible with Epson MP-80 (MX-80) 
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This is the pick of printers in my opinion, 
and certainly is the logical choice if you ever 
think of up-grading to a 'IBM' class’_ type 
computer. An extra switch is situated on _ the 
left hand side allowing you to select:- 


DRAFT-MODE: Ordinary Dot Matrix 
mode at 120 c.p.s., used for drafts 

etc.. 

NEAR LETTER QUALITY MODE: Uses 
double pass of print head, and 
produces excellent quality print 

(see examples and programmes 'Maths 
Practice’ and 'MENU-MAKA' in this 
issue-hopefully this will help the 
confusion between 'O' and_ '0! 
readers have had). 
PROPORTIONAL-MODE: This really 
compresses’ print and makes it look 
more professional looking, although 

the character set used is some-what_ 
different to normal print (see 
sample). 


I" HSLE C)#+,—-. /012345678 
1" HSAR COK+,-—./01239456789 


se if! 


To select the mode you want, you can manually 
select this PRIOR to switching on the _ printer, 
once switched on you can change the switch, but 
it will not change the mode. Of course this is 
also available through software switching. 


The standard printer has 3 IBM-PC Graphic Modes 
built in in addition to the normal character 
set. Another great feature is a IK _ input 
buffer, and you can purchase an_ extra AK 
Parallel buffer for $120.00. 


This printer has so many features, and is 
certainly my pick of all of the printers on’ the 
market, unless some special application such as 
a wide carriage or a Daisy Wheel is needed. 


SOFTEX Price: $490.00 plus $10.00 
Post 


registered 


Samples of print, Draft, NLQ, and Proportional. 


3<=>7GABCDEFGHI JELMNOPQRSTUVWXYZENI*_ tabcdefgh 
<=> ?GABLCDEFIGHI JKLMNOFORSTUVWXYZENI*_ tabcdefghi 


"#$ 28" C+, —. /01239456789: 3 <=> ?GABCDEF GHI JKLMNOPQESTUVWXYZEO\I“_ tabcdefghi j 


PP HSX&? C)K+,—. /0123456789: 3 <=> P@ABCDEFGHI JKLMNOPQRSTUVWXYZI\1%_ ‘abcde fgh 
PP HERE? C*&+,-./0123456789: 3 <=> P@ABCDEFGHI JKLMNOPQRSTUVWXYZ[\ ]*_ ‘abcde fghl 
"#$%E&? C)K+,—./0123456789: 5 <=> P@ABCDEFGHI JKLMNOPQRSTUVWXYZI\ 1%*_ ‘abcde fghi j 


"#$%&'()#+,—,/0123456789:;<=>7@ ABCDEFGHIJKLMNOPQRSTUVWXYZL\)*_ ‘abedefghijklmnopqrstuvwxyz 
MW BSBHE'OF+,—,/0123456789: <=>? @ABCDEF GHIJKLMNOPQRSTUVWXYZI[\)*_ ‘abcdefghijklmnopqrstuvwxyz 
S$ %K'(F4+,—,/0123456789:; <=>? Q@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]"*_ ‘abcdefghijklmnopqrstuvwxyz 
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SPECIFICATIONS 


Wire impact dot matrix, 
9 wires (0.3 mm dia) 


120cps (59 LPM) 


Printing 
Method: 
Print Rate: 
Line Feed 
Speed: 100 msec 
Print Direction: Bi-directional with logic seeking 
Input Buffer: 1 KB 
Character Set: Standard Mode 
96 ASCII character with descenders 
11 semi graphics, 
8 international characters 
Italic characters 
IBM-PC Matrix Printer Mode 
96 ASCII characters with descenders 
64 block characters 
9 international characters 
IBM-PC Graphic Printer Mode 
Additional ASCII contain European, 
Graphic, selected Greek characters, 
math and extra symbols. 
20 block characters and programmable 
graphics. 
Draft-mode (Std. Pgm) is a high speed 
printing mode. The printer will print 
bi-directionally at 120 characters per 
second. This mode is used for rough 
drafts and preliminary documents. 
Near Letter-Quality mode (NLQ) allows 
the user to print high quality documents. 
The density is achieved by a double pass 
of the print head. 
Proportional-mode. This print mode gives 
the output document a typeset look by 
varying the width of the character. For 
example, “’I”’ ora ‘1’ does not take up 
the same space as an “MM” or ““W" 


Print Mode: 


Font 
Registration: 
Choracter 
Structure: 9x9 
Choracter Size: Ordinary characters 
1.99 (W) x 2.24 (H) mm 
Superscript/subscript characters 
1.9 (W) x 1.36 (H) mm 


Up to 40 characters 


Number of Ordinary (pica’elite) 80/96 

Characters per Double width elongated (pica‘elite) 40/48 

line: Compressed (pica/elite) 132/158 
Compressed and elongated (pica/elite) 
66/79 
Superscript, subscript (pica/elite) 80/96 

Paper Feed: Friction feed, Sprocket feed 

Paper Width: Fantold 4-10 inches 
Cut sheet 4-9 inches 

Copies: 3 max. 

Interface: Standard Centronics-style 8 bit parallel 
Optional RS232C with 2K buffer 

X/ON-X/OFF and ETX/ACK protocol) 

Ink Ribbon: Cassette (Service life: 3 mil characters) 

Head Service 

Life: Over 100 mil characters 

MTBF: 2000 hours 

Temperature: 5-40°C Temp. 

Humidity: 20-80% humid. 

Power AC 220V (50/60 Hz) 

Requirement: AC 240V (50/60 Hz) 


AC 120V (60 Hz) 


Power 

Consumption: 0.6A 

Dimensions: 282(D) x 403(W) x 115.5S(H) mm 
Weight: Approx. 7.0kg 


News Briefs 


128K Memory Card Improved. 


Foundation have improved their 128K Memory Card 
for the 99/4A, It is now possible to store 
files into the 96K of memory not utilized by the 
99/4A, However, it would seem that it is 
limited to one file per 32K, which seems a_ bit 
restrictive. The extra memory acts as a "lide" 
disk; that is, you can save and retrieve files 
from the memory, and do it very much faster than 
with a disk system. Obviously, though, one must 
save the files to disk before turning off the 
computer. Some software is on the way to _ fully 
utilize this memory. 


KEKKEKKHKEKEEKEEKKEE EEK HEHEHE KEKKEKEHKEEKEKEEEKEK KEKE 


Imagic have told us the prices for the TI-WRITER 
will be $150.00, and for Multiplan $160.00. 
Sure, it sounds a lot, but even at those levels 
they are still excellent value, in our opinion. 
It's still the cheapest version of multiplan 
around, 


KEKEKKEKEKKKKHEKEK HEE EEE KEEL KKH KEKKKKEKEKEKKKKEKEKEK 
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Home Computer Magazine Drops Advertising. 


In a move which must be seen as unparallelled in 
magazine publishing, HCM has dropped all 
advertising in its latest issue. The reasons 
cited are that greater editorial freedom is now 
possible, and layout is not complicated by the 
presence of ads. 


Advertising shall continue in a new publication, 
"HCM Digest", which shall be mainly advertising, 
with limited editorial content. Whether _ this 
shall ever get to Australia remains to be seen. 


Melbourne Users' Group have written to HCM along 
the lines that the duty of a magazine is to 
inform, and that by dropping advertising, HCM is 
reducing its capacity to inform; a sentiment 
with which SOFTEX agrees. 


Indeed, there are plenty of 99/4A users who 

purchase HCM ffor the ads., rather than the 
articles. I wonder if HCM_ have not made a 
considerable miscalculation? I guess time will 

tell. 


KRKEHKEH HEH KEKEHE KEK HER EEK EEK HEEKKEKEKKEEKEKKEEEEKEKEE 


Workstations Continued 


Following our article last issue on 
workstations we are_ pleased to _ publish some 
further examples for you to consider. 


Dear Softex, 


I write in response to your recent article 
on Workstations. 


When I _ designed my workstation my aim was 


to conceal all cables and have the printer, 
paper, disks, command modules, etc. accessible 
from one position. 


My wife and I spend up to eight hours in 
one session working with Multiplan. Therefore, 
the table had to be comfortable and _ allow 
sufficient workspace. 


The workstation is supported by adjustable 
metal trestles which can be set at 30mm 
increments. I've set the table top to a height 
of 690mm(27") which brings the centre of the 
keyboard to 740mm(29"), One drawback was that 
the trestles only had 2 screws to attach to’ the 
table. This would have been unstable 
considering the weight they had to support. To 
overcome this I placed 50x25mm_ dressed pine 
along each side of the  trestles' horizontal 
support. 


The workstation is constructed on a 
standard sheet of chipboard 1500x900mm. The 
back section is constructed on a box frame made 
from 50x25mm dressed pine(actual 42x19mm). On 
top of the frame is a standard sheet of 
chipboard 300mm _ wide. This elevated the 
Expansion Box 58mm off the table. 


By elevating the back’ section of the 
workstation, I was able to construct the raised 
platform to the right of the computer. This 
platform serves 3 purposes. It conceals’ the 
Expansion Box _ plug(actual cable passes through 
the table), contains my cassette recorder, and 


best of all, provides a writing space for those 
of us that are right handed. 


In the left rear section of the workstation 
I placed a_= speaker. Behind the speaker is a 
six-pack power board, the’ transformer, and 
enough space to provide adequate ventilation. 


Above the speaker are 2 compartinents large 
enough to hold one ream each of A-3 and A-4 
paper. 

To the right of the speaker is a metal 
plate with two switches. The metal plate is 
used to. ground static electricity. The first 
switch supplies power to the power board and the 
second switch turns on the second disk drive. 
Below the switches is a drawer’ which holds 
eleven command modules. 


I used timber’ to elevate the second disk 
drive to the same height as the first, allowing 
all vents to be _ fully exposed to _ provide 
ventilation. 


Now a few notes about the computer cables, 
All cables .to the rear of the computer pass 
through holes in the table positioned far enough 
behind to avert. strain on the plugs. These 
cables are secured underneath by plastic clips. 
Just behind these holes I have placed a wooden 
strip. This strip serves two purposes. First, 
it protects the cables’ passing through’ the 
table. Second, it serves as a stop for a_ piece 
of 3 ply which is kept in the gap above the 
Expansion Box. The 3 ply, when used, is_ placed 
against the wooden strip with its top resting on 
the monitor shelf, This enables me _ to prop 
books, magazines, text, etc., directly in front 
of the keyboard. 


This workstation cost $155.00 to construct. 
The following is a breakdown of costs: 


$55.00 Timber 

$70.00 Trestles (IKEA) 

$5.00 8g 1.25" particle board screws 
nails 

$ 8.00 (2)240v 12a switches 
wiring 

$ 4.00 plastic clips 

$ 8.00 Estapol 


$155.00 


Construction time was roughly 20 _ hours 
using basic tools. If anyone is interested in 
constructing a similar workstation, feel free to 
contact me. 


Terry Houge 

25 McDonald St. 
Morwell, Vic. 3840 
(051)34-7015 
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TAC-2 Joystick 


By Wayne Worladge 


I acquired my set of TI joysticks sometime 
in early 1982, and they have = survived 
"Invaders", "Attack", Munchman", "TI-Toad", 
"Entrapment", and, latterly, "Cubit". Along the 
way, they also were used in "Tombstone City", a 
much underrated game which would have to be 
harder on joysticks than any other game I _ have 
experienced. 


It was this latter game where I first had 
the vague feeling that perhaps the Joysticks 
weren't quite up to the game, but I dismissed 
the thoughts, blaming sadistic programmers. 


Then Jack Jeffs made his own set of 


joysticks, (See SOFTEX No.1), and I had the 
opportunity of trying’ them out. They felt very 
positive, like a good manual gearbox, but Jack 
wasn't interested in parting with them, and | 
didn't have time to make them, so I continued on 
as-was, 


I had been aware of allegations that there 
were "better" joysticks available, and _ that 
one's scores in games were, to some extent, 
dependent upon the joystick used, but I hadn't 
taken a lot of notice, as I don't play games all 
that much, and the money was always needed for 
something of greater importance. 


Then disaster struck, and one morning I 
went to my study to find a broken handle on the 
floor - someone had trodden on one of the pair. 
Araldyte fixed the problem, but at a User Group 
meeting a few weeks later, the handle of the 
second joystick was broken by an 
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over-enthusiastic player. More araldyte! Then 
the first one broke again, and _ MI could see 
something had to be done. 


Stuart Brown, of Imagic, had shown us_ the 
TAC-2 joystick at a Meeting, and having decided 
to get a replacement, I acquired one from Imagic 
(along with a two-year guarantee), and an 
adaptor from Gametronics. 


The TAC-2, in appearance, is quite 
different to the TI product. It is square, (100 
by 100 mms.), thicker in the body, (around 40 
mms.), and has a chromed central shaft ending in 
a 30 mm. diameter black ball. Indeed, harking 
back to cars again, it really does look like the 
gear lever of a sports car. 


There are two fire buttons, in the top left 
and right corners, thereby catering for play 
with either hand. Well, how does it play? To 
answer, very well indeed. I dragged out an old 
favourite, "Invaders", and in the second game, 
got to level four, something I could rarely 
achieve previously, even when in form, as_ it 
were, For those who can remember, one way of 
playing that game is to_. shelter’ behind a 
barrier, shoot a chimney through it, and attack 
the invaders as_ they pass. With the other 
joysticks, it was a real art to return to such a 
barrier, and to position oneself exactly under 
the same chimney. There is a technique to move 
a very small amount, and that is to smack the 
joystick rather than move it. Well, with the 
TAC-2, such fine positioning is much easier. 


They are "noisy", in that they 
clack, but one soon gets used to t 


they appear to be an excellent product, and I do 
would improve with their 


believe one's 


use. 


scores 


I only have two minor gripes. 


do click and 


hat. In all but the 


mm. 


It would be 


nice to have a lockable grid so that for games out, but 
which only require rectangular movement 

("‘Munchman", for instance), one is prevented to fall 
from moving in the diagonal direction. Still, 

for the price, it is excellent value. The way. 


ADVANCED USE OF BASIC. 
Vol. 1 No. 2. Page 33 


Change line 420 
420 ACI)=INT(RND*10) 


MAIL LABEL PROGRAM. 
Vol. 1 No. 3. Pages 15, 1/7 


Change lines as follows: 


160 DISPLAY AT(2,1)BEEP: "ENT 
RY 31 


2330 IF BS="Y" OR B$="y" THE 
N C$=SEG$(LN$(1),1,1):: GOTO 
2370 


AUTO-RUN PROGRAM. 
Vol. 1 No. 3. Page 23 


Change and add following lines: 


Erata 


100 CALL CLEAR DISPLAY AT 
(12,1):"CATALOG? Y/N: Y" :: 
ACCEPT AT(12,15)SIZE(-1):R$ 

>: IF R$="Y" OR R$="y" THEN 

106 ELSE CALL CLEAR END 

104 REM DELETE REM IN NEXT L 
(NE FOR SINGLE DISK PROCESSI 
NG. DELETE THIS AND NEXT LIN 
E FOR MULTIPLE DISK PROCESSI 
NG. 


106 REM A$="DSK1." GOTO 1 
50 
110 CALL CLEAR DISPLAY AT 


(10,2)BEEP:"Enter DSK No. D 
Sk1." :: ACCEPT AT(10,20)SIZ 
E(-1)VALIDATE("123"):A$ :: A 
$="DSK"&AGSE&"" 
DELETE LINES 120, 130, 


280 CALL KEY(3,K,G):: IF G<> 
O THEN IF K<49 OR K>84 OR (K 


long and, of course, plugs 
port on the left side of the console. 
the other joysticks, the plug occasionally 
with 
thing sags somewhat alarmingly, and I expect it 
out at any time. 
is clear that it will need supporting, in 


140 


second gripe does not even concern the joystick, 
adaptor. 
joystick is not designed for the TI] 
Atari- type computers. 


This is necessary, for the 
99/4A, but 
The adaptor is nearly 80 
into the game 
Even with 
fell 

the adaptor as well, the whole 


(It hasn't, yet.) It 
some 


>52 AND K<65)THEN 280 ELSE 2 
90 ELSE 280 


390 IK K>50 THEN 440 ELSE DI 
SPLAY AT(23,1):"SELECT" :: C 
ALL SCREEN(7) 

400 CALL KEY(3,K,G):: IF (G< 
1)OR(K+X-64>1)OR(K<65) OR(K>6 
3+E)THEN 400 

405 IF P$(K+X-64)="P" THEN D 
ISPLAY AT(23,1):"CANNOT DELE 
TE-PROTECTED FILE" :: DISPLA 
Y AT(24,1):"*PRESS ANY KEY T 
O CONTINUE*" ELSE 420 
410 CALL KEY(3,F,G):: 
THEN 410 ELSE 230 


IF G<l 


430 DELETE A$&C$(K+X-64):: G 
OTO 150 


490 CALL KEY(3,F,G):: IF G<l 
THEN 490 ELSE 230 
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Book Review — “TI BASIC” 


by Richard Haskell and Jeffrey Haskell 


Published by Prentice-Hall 
Cliffs, New Jersey, 1984. 


Inc., Englewood 


Reviewed by Wayne M.Worladge. 


This second book sent to us by 


Prentice-Hall is presented in a completely 
different style to "Kids and the 99/4A", 
(reviewed in  SOFTEX no.4), despite the 
objectives of the authors being similar. 


The authors have presented an _ "adult" 
instruction book, as it were. This book is 
written in serious, adult language, but is also, 
thankfully, clear and concise. 


According to the descriptions of the 
authors, Richard Haskell is a Ph.D. graduate 
who holds the positions of Professor of 
Engineering and Chairman of Electrical and 
Computer Engineering at Oakland University in 
Michigan, He has written seven. books for 
Prentice-Hall, most of them BASIC Language 
instruction books for the various popular home 
computers, though he has one’ assembly language 
book (for the Apple II) to his credit. Jeffrey 
Haskell is a graduate of the same university in 
electrical and computer engineering. 


One would assume, from the above curriculum 
vitae, that they would know what they’ were 
talking about, and the book reflects _ this. 
Perhaps the Chapter Headings will tell you more 
than I can: 


1LEARNING TO USE THE _ TI-99/4A 
KEYBOARD 

2,.LEARNING TO PROGRAM IN BASIC 

3.LEARNING MORE ABOUT PRINT 

4,ENTERING DATA FROM THE KEYBOARD: 
LEARNING ABOUT INPUT 

oA REPETITION LOOP: LEARNING 
ABOUT FOR....NEXT 

6.MAKING CHOICES: LEARNING ABOUT 
IF... THEN AND 
IP sc THEN. .3sELSE 

7.LEARNING TO USE LOW RESOLUTION 
GRAPHICS: DISPLAYING THE FLAG 

8. LEARNING MORE ABOUT LOOPS: 
ANOTHER LOOK AT = IF....THEN 

_ 9 LEARNING TO USE GOSUB & RETURN: 

SUBROUTINES 

10.MAKING BAR GRAPHS: LEARNING 
ABOUT READ...DATA 

11.LLEARNING TO USE ARRAYS 


12.LEARNING MORE ABOUT STRINGS 
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13,.INTERACTIVE AND 
THREE-DIMENSIONAL GRAPHICS 

14.SPRITE GRAPHICS 

IS.LEARNING TO PUT IT ALL TOGETHER 


It can be seen from the - above chapter 
headings that the authors really do specify that 
their book is about learning. 


FEATURES 


The features that set this book above the 
rest of the pack are: 

a) the method of instruction of the authors 
is for the learner to get hands-on experience. 
Every point they make is. illustrated with a 
program, however _ short. In most cases, the 
program is presented in steps. A few lines will 
be typed in which demonstrate the first point, 
then a few more which demonstrate another, and 
so on. At the end of the segment the program is 
listed in full. 


b) program lines in the text are printed in 
darker print, and are very clear. However when 
program listings are printed in diagrams, or in 
whole at the end of chapters, an imitation of a 
dot-matrix printer is used. There is no_ need, 
in my opinion, for this simulation. Perhaps it 
may look like the output from a (poor quality) 
dot-matrix printer, but what possible advantage 
is that in ease of reading? 


c) The book is liberally interspersed with 
photos, real or simulated, of what the monitor 
screen appears like when the example _ programs 
are run. This is really an excellent feature, 
and if hard to read at times, really does have 
value, as the learner can see exactly what is 
supposed to happen. 


d) Each chapter has exercises for the 
learner, in which he/she has the opportunity to 
test the knowledge gained in that chapter. 


CONCLUSIONS: 


This is a really professional book, one 
which will be of immense benefit to learners and 
beginner programmers. Both extended and _ normal 
BASIC are covered. Recommended retail price was 
$23.95, in my opinion, excellent value. 


GAME REVIEW — “BRICK-BAT”’ 


By Wayne Worladge 


[Declaration of Interest: As a Director of 
Softex Pty.Ltd., I have a financial interst in 
this game, in_ that Softex Pty.Ltd. are 
marketing it.] 


Notwithstanding the above statement, I feel 
I can be impartial in reviewing this game. The 
reasons are that I did not write it, and indeed, 
did not play it at all prior to SOFTEX deciding 
to obtain the rights for its sale. 


This game_ started its life as an entry in 
the Melbourne User Group's Software competition, 
held in 1984, It was written by Mark Eddy of 
Cheltenham. It was later improved by _ Bernie 
Elsner and Lindsay Preece, both of Perth. 


This game is both old and_ 0new. Old, 
insofar as it is similar to those early video 
games one could purchase to run on one's TV; 
that is, a bouncing ball game. I expect most of 
us have either had such a game, or at least 
played one. The version I had gave you a choice 
of squash, hockey, tennis and one _ other,(a 
practice game, I think), Well, "Brick-Bat" is a 
bit like those sort of games. 


It is new insofar as it gives a new slant 
on an old concept, and is written in assembly, 
which, while not new, is beyond the capabilities 
of most TI owners. 


The task is simple. The game starts with a 
vertical brick wall on the screen, to the centre 
right, on a_ blue’ background. One way of 
visualizing the game is to pretend you are on a 
squash court, and there is a floor-to ceiling 
brick wall. between you, the player, and the back 
wall. Each time you hit the brick wall a brick, 
or a number of them _ evaporate. The only 
difference is that, unlike a squash court, the 
ball can also bounce off the ceiling. To the 
left is a white bat, which can be moved up and 
down with the "S" and "D" keys. (Yes, "S" and 
"D", they're easier to use than "E" and "X".) At 
the start of the game, the bat is centrally 
located on the left border, and a_ round, black 
ball appears from the centre face of the wall, 
and hits the bat, always providing you do-_ not 
move the bat. The ball bounces off the bat at 
an angle, and after that, you have to prevent 
the ball passing your bat, and exitting on the 
left side of the screen. The ball will rebound 
from the top and bottom edges of the screen. 


Fach time the ball hits the wall, one or 
more bricks disappear. The objective of the 


game is to remove all the bricks from the 
screen, without running out of balls, of which 
five are provided at the_ start. Should you 


succeed, another wall appears immediately, with 
the ball travelling somewhat faster. Should you 
destroy the second wall, another one appears - 
and that is as much as I'll tell you, though it 
takes many games to obtain the required level of 
competence to get that far, and there are a 
definite number of walls, so it is possible’ to 


win! 

When I first received a copy of the game, 
it would not run at all. It immediately bombed, 
and the computer returned to the title screen. 


There was a considerable degree of puzzlement 
over this, as it worked fine for Doug - and then 
we realized that I had the Mark I version of 
XBASIC, Could this be the problem? We were 
right. As some of my relatives say when meeting 
such a problem :"Fix it - with the chequebook." 
A new XBASIC module allowed the game to proceed. 


After a considerable time [| mastered it, 
but found that after the second screen, there 
was nothing, no congratulations, the ball just 
kept bouncing around an empty screen. Further, 
there was no title screen, the game _ simply 
Started as soon as_ it loaded. Doug seemed 
puzzled again at my _ vitriolic comments about 
lousy presentation, when again the penny dropped 
- I had received an unimproved _ version. I am 
pleased to say the version for sale does have a 
title screen, there are more screens than_ two, 
and after you exhaust the supply of balls, you 
have the option of playing again. 


The improved version also displays current- 
and high- score, and _ the balls remaining are 
shown at the base of the screen. Your stock of 
balls increases by two each time a wall is 
cleared from the screen. 


Like all games, there is a technique which 
permits one to achieve the desired result 
quicker and easier. If you can penetrate’ the 
wall, the ball will then bounce between the back 
of the wall and the right hand side of the 
screen, destroying bricks as it goes, with the 
player having to do very little but watch, and 
be waiting for the ball to come back to his side 
of the wall again. 


This sounds easy, but it is hard to 
concentrate your efforts on one area of the wall 
- that is, to tunnel through. There is a 
quicker way, but it does involve fine judgement, 
and is risky. If the ball hits the very edge of 
the bat, it will come off at a very acute angle, 
and if it enters a tunnel in the wall you _ have 
already created, and if the angle is right, the 
ball will "burrow" its way right through the 
wall. All well and good, but there are a few 
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"ifs" involved, not the least of which is away all the bricks. As soon as the last brick 


actually hitting the very edge of the bat, and disappears, the next screen starts immediately. 
not missing altogether. The other problem’ with In other words, there is no respite. It can be 
this is that if the ball comes off the bat at an exhausting, but if you want a break, press "P" 
acute angle, it will usually rebound at an acute and the game halts until you hit the space bar. 
angle, needing some _ pretty good judgement to 
prevent missing it on its return. One gripe is that sometimes the ball hits 
the middle of the bat at an angle, but returns 
There are a lot of good things about _ this along its entry path, contrary to the laws of 
program. The colours are well-chosen, the game Newton. Perhaps this is deliberate, to add an 
is fairly fast, and response of the bat to key element of unpredictability. Also, very, very 
press is instantaneous; so much_ so that one occasionally, the ball may be hit in such a way 
tends to lose a few balls simply because you that it runs along the very top or very’ bottom 
don't believe it is possible to move the bat border. Once it is on this track, it cannot be 
fast enough. removed from it except by deliberately missing 
Also, the ball behaves the way it should, it. It does make it easy to penetrate the wall, 
in real life (mostly, anyhow.) If it hits the however. 
edge of the bat or a brick, it will come off at 
an acute angle. I think, on occasions, it also In all, though, I like the game. As a 
speeds up, but perhaps that's only an_ optical child, I passed many a pleasant hour hitting a 
illusion. tennis ball against a brick wall, or throwing a 
golf ball against a wall, and attempting to 
Be warned! This game can take a long time catch it. (Is there something a _ psychologist 
to play, so make sure the kids are out of the would make of this? Something to do _ with 
way, and the wife is having a snooze before you precision, logic, that leads such people to like 
start. The brick wall is fairly thick, and so, home computing?) 


it does take a long time (5 minutes) to clear 


Readers Mart 


Free advertising up to a maximum of 3 
lines available to subscribers only. 

Non subscribers and _ in excess of 3 
lines (Max. 42 Chars. ea.) at $2.00 per 


line. 

* PRENTICE STAR ACOUSTIC COUPLER - Ready CONTACT: A. Brown, Toowoomba (076) 
to connect to. any telephone headset. 326975 
$140.00. 

* TI-99/4A, Joystick, Tandy Datasette. 

* EXTERNAL POWERED DISK DRIVE - SS/DD * Modules - TI Invaders, Parsec, Tunnel of 
Drive ready to connect direct to your Doom, 2 Books of Programs, 6 User Group 
TI-99/4A Expansion _— Box. Excellent Cassettes, Magazines. 
condition. $200.00. Purchased Jan 84 $690.00, Sell $490.00 

ono. 

* 2 TI DISK DRIVE CARDS -_ Excellent 
condition, ready to run. $120.00. _ 

With an external power supply can_ be CONTACT: Phil Cashmore, Nathalia 
used as a 2rd. or 3rd. drive (Power (058) 662331 
supply and cable $85.00), AH (058) 662357 
CONTACT: Doug Thomas, (03) 7258178. 2 TI-99/4A Computer and Speech 
Synthesizer, Extended Basic, 3 Modules 

* TI DISK DRIVE CARD - $150.00 (Games, and speech), Manuals and Book of 

* The Attack Cartridge - $10.00 Games. $300.00 ono. 

* Hunt the Wumpus - $10.00 

* Amazing - $ 10.00 

* Mini-Memory - $40.00 CONTACT: Ron ‘Alwood, (03) 3983681 
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Maths Practice Program 


By B. Rutherford 


When my youngest son started to bring home 


from school half a page of sums, for homework in instructions, 
the form:- programme. 

37 49 

a3 + or 23- 850. Because 


I thought here is an idea for 
to help him learn his’ elementary arithmetic 


prompts, reminding of the need 


As the 
necessary information I! will 
here. Lines 500-520 set up the screen 


The user also has the option of jumping the 


they know how to use the 
instructions give all the 
not repeat them 
display, 


with the main loop starting at 530 and going to 


together in 


programme 


CARRY, or 


BORROW and then CARRY if necessary. This also 


reminded him that he was doing the units first, 
then the tens, and lastly putting 
I believed the idea was a 
but son being smarter than father, progressed 
past this stage of his maths before I could get 
and running. 


hundreds, 


the programme written 


was not lost and I won a TISHUG monthly software 


award with the _ ffirst version. 
second version and _ has_ speech 
attraction. 


good one, 


addition and_ subtraction are 
the same loop (for 
conservation), the number of conditionals needed 
tends to make the whole loop quite messy. Still 
it seems to work reasonably well. 


memory 


From 860 to the start of the sub-programmes 


in any is the end section, where a different response 


Still all the string 
frequency. 
This is the programming 
an added 


is given for the 
correctly. The ‘Star Wars' music that is played 
when more are answered right than wrong _ using 
variable M$ to set the duration and 


number of problems answered 


is not the _ best way of 


music as there is too many 
approxiamations of notes and durations, but it 


does not use a lot of memory. 


There is no need _ to worry if you do not Next 


have a_ speech. synthesizer, as 


checks to see if one is plugged in at line 260, 
CALL PEEK(-28672,SS). The 
programme runs a little faster at the beginning, 


with the statement 


programme 


without the speech synthesizer as it jumps over 


lines 265-280, which sets up the number array 
for the sub-programme NUMSP. I 


have put’ the 


conditional IF SS=0 THEN, in the SPEAK and NUMSP leave out 


sub-programmes, as it saves having to check this 
before each speech part of the programme, and 


of line 260. 


does not seem to slow the programme execution. 


100 REM KKKKKKKKKKKKKKKKKK 
110 REM x maths practice x 
120 REM x by * 
130 REM xBrian Ruther ford*x 
140 REM x 9 Bombala St x 
150 REM xDudley NSW 2290x* 
160 REM x 2nd. version x 
170 REM x copyright 1984 x 
180 REM x99/da xb versionx 
190 REM KKKKKKKKKKKKKKKKKK 


210 REM 

220 DATA 0000000206020207,FF 
» DOOOQNQ0QOQONOOOOOFF , OOOOOOF FFF 
»1818181818181818, 181818 
FFFF181818,0001020488502,FF8 
18181818181FF, OOOOOOO00F0909 
OF 

230 CALL CLEAR :: RANDOMIZE 
>: CALL MAGNIFYC2):: CALL SC 
REEN(C3):: T=2*C1/12):: F 

OR I=1 TO 14 CALL COLOR(CI 
»2,11):: NEXT I :: CALL PLAY 
€1,24,T) 

240 FOR I=1 TO 8 :: CALL SPR 
ITEC#!,ASCCSTR$ CINTCRNDx10) > 
>, INTCRND*8)+3,92,124,IN 
TCRND*=255)+127, INTOCRND*-255 


>+127) 

250 CALL SOUND(-99,110xT*I,1 
2-I1):: NEXT I :: FOR [=128 T 
O 136 :: READ A$ :: CALL 
CHARCI,A$):: NEXT I 

260 OPTION BASE O :: DIM B8¢ 
19),NM(2),ANS(3),NN$C€2):: DE 
F RANCX)=INTCRNDXxHH):: C 


ALL PEEK(-28672,S5):: IF SS= 
O THEN ‘290 
265 FOR I=0 TO 19 :: READ BS 


CI)d:: NEXT I 

270 DATA ZERO, TEEN, TWENTY, TH 
IRTY,FORTY,FIFTY,SIXTY,SEVEN 
TY,EIGHTY,NINETY 

280 DATA TEN, ELEVEN, TWELVE, T 
HIRTEEN, FOURTEEN, FIFTEEN,SIX 
» SEVEN, EIGHT, NINE 

290 DISPLAY AT(8,6):RPTSC( "x" 


»18):°* *x maths practice 
xy * by 

Kr" 3? *xBrian Rutherford 
”" 
300 DISPLAY AT(12,6):"x Du 
dley 2290 x":”" x copyri 
ght 1984 x":” “3RPT$ 
C"*",18) 


330 CALL SPEAK(” THIS+1IS+YOUR 


names are all the description 
CALL SPGET's 
down a little, although they improve the way the 
numbers are spoken. 


Finally 
progamme to much for you or your child, you’ can 
the CALL PEEK or add SS=0 to the end 

Other than that just type it in, 
and follow the screen prompts as they come up. 


have sub-programmes, where their 
needed, but the 
in NUMSP_ do tend to slow things 


you find the speech slows the 


+#TEXAS INSTRUMENTS#+COMPUTE 
R”,SS):: CALL PLAYC12,36 
»T):: CALL SPEAKC"PLEASE+TYP 
E+IN+YOUR+NAME” ,SS) 
340 CALL DELSPRITECALL):: DI 
SPLAY AT(C9,1) ERASE ALL BEEP: 
“Hello I am your Texas”: 
:“instruments computer” 
360 DISPLAY ATC(13,2): "What i 
s your name” :: ACCEPT AT(13 
»20)SIZEC8):N$ :: CALL S 
PEAK( *DO+YOU+NEED+INSTRUCTIO 
NS",SS) 
400 DISPLAY ATC10,5) ERASE AL 
£L BEEP: "OK “;N$;" Just press 
Suge eg y for instruct 
Lons i" " s" or n for none" 
410 CALL SPEAK(C"PLEASE+PRESS 
+Y+OR+N",SS):: CALL KEYSCK,S 
>:: IF K=89 THEN CALL IN 
ST ELSE IF K<>78 THEN 410 
450 DISPLAY AT(10,1) ERASE AL 
L BEEP:"“press 1 for addition 
" $s: DISPLAY AT(15,1):"p 
ress 2 for subtraction” :: C 
ALL CHOICE(2,AS,SS) 
460 DISPLAY ATC9,1) ERASE ALL 
BEEP: "press 1 for easy": :"° 
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press 2 for not so easy" 

: :"press 3 for hard” :: CAL 
L CHOICEC3,K,SS) 

470 IF K=49 THEN HH=10 ELSE 
IF K=50 THEN HH=K ELSE HH=10 
0 

900 CALL CLEAR :: CALL HCHAR 
€12,18,129,5):: CALL HCHAR(1 
4,18,130,5):: CALL HCHAR 
€10,24,131,3) 

5910 IF AS=49 THEN CALL VCHAR 
(9,25,132):: CALL VCHAR(10,2 
9,133):: CALL VCHAR(11,2 
5,132) 

5920 DISPLAY ATC3,3):"problem 


number” ;:: DISPLAY ATC9,1)S 
IZEC8):N$S :: DISPLAY ATC 
11,1 )SIZEC2):"ME" :: RIGHT,W 
RONG=0 


930 FOR PROB=1 TO 10 :: RAND 
OMIZE :: DISPLAY ATC(3,18)SIZ 
E(3):PROB :: DISPLAY ATC 
20,1):"press D to correct an 
error”: :"press space bar t 
o finish” 
940 FOR I=1 TO 2 :: NMCI)=RA 
NCX):: NEXT I :: IF AS=50 AN 
D NMC 1)<NMC2)THEN 540 :: 
IF AS=49 THEN SOL=NM(1)+NMC 
Z2J ELSE SOL=NM(1)-NMC2) 
945 R=56 :: SP=1 :: I=0 
950 IF AS<>49 THEN 555 :: CA 
LL SPEAK( *THE+SUM+0OF” ,SS) 
555 CALL NUMSP(B$¢(),NM(),SS, 
2) 
560 I=I+1i :: NNSCI)=STRSCNM(C 
I)):: C=136 :: FOR J=1 TO LE 
NCNNSCI)):: X=VALCSEGS(N 
N$CI),J,1)):: IF LENCNNSCI))D 
=1 THEN C=160 
970 CALL SOUND(80,131,10):: 
CALL SPRITEC#SP, ASCCSTRS$(X)) 
»6,R,C):: C=C+24 :: SP=S 
P+1 :: NEXT J :: R=R+16 :: I 
F I>1 THEN 600 
580 IF AS=49 THEN CALL SPEAK 
C°AND",SS.ELSE CALL SPEAK(C°T 
AKE+A+WAY”",SS) 
990 CALL NUMSP(B$(),NM(),SS, 
2):: GOTO 560 
600 R=R+3 :: SP=5 :: I=1 
C=C-24 
610 IF AS=50 AND HH>49 AND I 
=1 THEN DISPLAY AT(16,9)BEEP 
>"press 1 to borrow”:” 
press O for none” ELSE 
640 
620 CALL KEYS(K,S):: CALL HC 
HARC7,20,136):: FOR D=1 TO 1 
O :: NEXT D :: CALL HCHA 
RC7,20,32) 
630 IF S<1 THEN 620 ELSE IF 
K=48 THEN 640 :: IF K<«>49 TH 
EN 620 :: CALL HCHAR(7,2 
0,128) 
640 DISPLAY ATC(16,1)BEEP:” 
UNITS":" * 
650 CALL KEYSCK,S):: IF I=1 
AND K=68 THEN 610 IF [>2 
AND HH<=50 OR I>2 AND AS 
=50 OR I>3 THEN 670 
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660 CALL SPRITEC#10,135,13,R 
»C):: FOR D=1 TO 10 :: NEXT 
D :: CALL DELSPRITEC#10) 

670 IF S<¢1 THEN 650 ELSE IF 
K=68 THEN 680 ELSE 710 


680 I[=I-1 SP=SP-1 :: C=Ct 
24 

690 IF I<1 THEN I=1 :: SP=5 
2: C=160 


700 GOTO 650 
710 IF K<48 OR K>57 THEN 820 
720 ANSC(I),X=K-48 :: CALL SO 
UND(90,880,10):: CALL SPRITE 
C#SP,ASCCSTRS(X)),5,R,C) 
730 IF HH=100 AND AS=49 AND 
I>1 THEN DISPLAY ATC(16,1)BEE 
Pe > HUNDREDS” :: 
GOTO 810 
740 IF I>1 THEN 810 ELSE IF 
AS=49 THEN DISPLAY AT(16,1)B 
EEP: * ANY T 
O CARRY” 
750 IF AS=50 AND HH)49 THEN 
DISPLAY AT(16,1)BEEP:” 
any to pay back” 

760 CALL KEYS(K,S):: IF AS=5 
O AND HH=10 THEN 770 
765 CALL HCHAR(11,19,136):: 
FOR D=1 TO 10 :: NEXT D :: C 
ALL HCHAR(11,19,32) 

770 IF K=68 THEN 690 

780 IF S<1 THEN 760 ELSE IF 
K¢€48 OR K>57 THEN 820 

790 IF K=49 THEN CALL HCHAR(C 
11,19,128) 

800 DISPLAY ATC16,1)BEEP:” 

TENS" 

810 C=C-24 :: SP=SP+t+1 :: [=I 
+1 :: GOTO 650 

820 DISPLAY ATC16,9):RPT8&(CH 
R$(€32),28) 

830 IF ANS(1)+10xANS(2)+100x 
ANS(3)=SOL THEN CALL RCRIGHT 
,SOL,BS(),SS)ELSE CALL W 
CAS,WRONG,SOL,R,BS(),NMC),SS 
) 

840 ANS(1),ANSC2),ANS¢3)=0 
850 NEXT PROB 

860 CALL CLEAR :: IF RIGHT=W 
RONG THEN 950 ELSE IF RIGHT< 
WRONG THEN 955 

870 MS="2>5KiGIEILA2X5KIGIEIA 
Z2X5KIGIEIG9IAZ>5SKIGIELA2X5K1G 
LELA2X5SKIGIEIG9A” 

880 FOR I=1 TO 63 STEP 2 :: 
CALL SOUNDCVALCSEGS (M$,1,1)) 
*200, CASCCSEGS (MS ,I+1,1) 
»-36)*10,5):: NEXT I :: CALL 
SPEAK(C“#YOU WIN#",SS) 

890 DISPLAY ATC 10,4): "You wi 
n “3;N8 :: DISPLAY AT(12,4):” 
you beat me”";RIGHT; “to” 
NRONG 

300 M$="9:2GIGIELA2>1>1A1E2A 
1:2=185:2GIGIE1A2K7A5: 2GIG1IE 
1A2>1>1A1E2A1:2=185:2G1G 
1ELA2K7A" 

910 FOR I=1 TO 79 STEP 2 :: 
CALL SOUNDCVALCSEG$(M$,1I,1)) 
*200, CASCCSEGS (M$ ,I+1,1) 
»-36)*10,12):: NEXT I 


920 M$="2>5KIGIEIA2ZX5KIGIEIA 
2X5KIGIE1LGIAZ>5DIGIELA2X5K1G 
1ELA2X5K1GiE1A9>° 

930 FOR I=1 TO 63 STEP 2 :: 

CALL SOUNDCVALCSEGS(M8,1,1)) 

x200, CASCCSEG$(M$,I+1,1) 

»-36)*10,6):: NEXT I :: GOTO 
980 

950 CALL PLAY(1,24,T):: CALL 
SPEAKC"IT+IS+A+DRAW",SS):: 

DISPLAY AT( 10,4): "It’s a 
draw “;N8 DISPLAY ATC12, 

4):RIGHT; "each" :: GOTO 980 

955 CALL SPEAKC°#!I WIN#",SS) 

960 DISPLAY AT(10,4):"I win 

"3;N$ :: DISPLAY AT(12,4):°I 

beat you”;WRONG; “to”";RIG 

HT 

970 J=1652 :: FOR I=1 TO 24 
:: CALL SOUND(C 200, 22000, 30,2 

2000, 30,J3J,30,-4,8):: Jad 

/1.059463094 NEXT I 

980 DISPLAY AT(22,1):"More p 

ractce “;N8;" y/n" 

990 CALL KEYSCK,S):: IF K=89 
THEN 450 ELSE IF K<«)78 THEN 
990 

1000 STOP 

4000 SUB KEYSCK,S):: CALL KE 

Y(3,K,S):: SUBEND 

4500 SUB PLAYCX,Y,T) 

4510 FOR I=X TO Y :: CALL SO 

UNDC100,110xT*I,ABS(26-I1)):: 
NEXT I 

4520 SUBEND 

5000 SUB INST 

5010 DISPLAY AT(4,1) ERASE AL 

L:"°Do these sums the same wa 

y":"":"you would do them 
on paper.”:"":"That is, do 

the units and” 

9020 DISPLAY AT¢(10,1):" put 

the answer in. Then put”:""; 

“in the amount that has 

to be“:"":"carried,even if i 

t is a” 

5030 DISPLAY AT(16,1):"zero. 
Then do the tens and":"":"p 

ut that in. Then any hun 

=" Ss areas. ~ 

5040 DISPLAY AT(23,1): "press 
any Key to continue” 

5050 CALL KEYSCK,S):: IF S=0 
THEN 5050 

5060 SUBEND 

6000 SUB CHOICE(X,K,SS) 

6010 :: CALL SPEAK(" YOUR+CHO 

ICE” +99) 

6020 CALL KEYSCK,S):: IF S<¢1l 
THEN 6020 

6030 IF K<49 OR(CK>X+48) THEN 

6040 ELSE SUBEXIT 

6040 CALL SPEAKC"UHOH+#TRY A 

GAIN#" ,SS) 

6050 DISPLAY AT(23,1):"°A num 

ber between 1! and";XK :: GOTO 
6020 

6060 SUBEND 

7000 SUB SPEAK(S$,SS):: IF-S 

S=O THEN SUBEXIT 

7010 CALL SAYCS$) 


7020 SUBEND 
8000 SUB NUMSP(BS$(),NM(),SS, 
I):: DIM NM8(2) 
8005 IF SS=0 THEN SUBEXIT 
8010 N=NMCI)D:: MS=STRSCN):: 
L=LEN(M$):: IF L<>3 THEN 802 
O :: NM$(O)=SEGS(M$,1,1) 
2: NM8(C1)=SEGS(M$,2,1):: NMS 
C2) =SEGS(M$8,3, 1) 
8015 CALL SPGET(CNM$(0O),H$):: 
IF NM$(1)="0" AND NM#%(2)="0 
“" THEN CALL SAY(C,H$, “HUN 
DRED"):: GOTO 8090 :: ELSE 8 
030 
8020 NM$(1)=SEGS(M8,1,1):: N 
M$ (2) =SEGS(M$S,2, 1) 
8030 IF L=1 OR NM$(1)="0" TH 
EN 8070 ELSE IF NM8(1)="1" T 
HEN 8050 
8040 N=VALC(NM$¢(1)):: CALL SP 
GET(CBS(N),X$):: IF NM$(2)="0 
“ THEN 8080 ELSE CALL SP 
GET(CNM$(2),Y%$):: GOTO 8060 
8050 N=VALCNMS(C1)&NM8$(2)):: 
CALL SPGETCBS(N),X$):: IF NK 
=15 THEN 8080 ELSE CALL 
SPGET(CBS(1),Y8) 
8060 IF L=3 THEN CALL SAYC,H 
$,"“ HUNDRED AND",X$8,,Y8):: GO 
TO 8090 :: ELSE CALL SAY 
(,X%,,Y$):: GOTO 8090 
8070 IF L=3 THEN CALL SPGET(C 
NM$(2),X$) ELSE CALL SPGETCNM 
$C1),X$) 
8080 IF L=3 THEN CALL SAYC,H 
$,° HUNDRED AND",X8%):: GOTO 8 
090 :: ELSE CALL SAYC,X$ 


) 

8090 SUBEND 

9000 SUB RC(RIGHT,SOL,B8(),SS 

) 

9010 F=410 :: FOR I=1 TO 6 : 
CALL SOUND(99, 420, 30, 440,3 

O,F,10):: F=Fx1.5 :: NEX 


T I 
9020 CALL SPRITEC#10,134,2,9 
6,184):: RIGHT=RIGHT+1 :: DI 


SPLAY AT(9,9)SIZEC3):RIG 

HT 

9030 NMC(1)=SOL :: CALL SPEAK 

C°#THAT IS RIGHT",SS):: CALL 
NUMSP(BS(),NM(),SS, 1) 

3040 DISPLAY AT(22,1):"press 
space bar to CONTINUE” 

9050 CALL KEYS(K,S):: IF S<¢il 
THEN 9050 

9060 CALL DELSPRITECALL):: C 

ALL HCHAR(11,19,32):: CALL H 

CHARC7,20,32):: SUBEND 

10000 SUB WCAS,WRONG,SOL,R,B 

$(),NM(),SS) 

10010 F=1652 :: FOR I=1 TO 6 
:: CALL SOUNDC200, 22000, 30, 
22000, 30,F,30,-4,10):: F 
=F/1.05 :: NEXT I 

10015 CALL SPEAKC"UHOH”,SS) 
10020 CALL SPRITEC#10,88,7,9 

6,184):: WRONG=WRONG+1 :: DI 

SPLAY AT(11,9)SIZEC3):WR 

ONG 

10030 DISPLAY AT(22,1): "pres 

s space bar for ANSWER” 
10040 CALL KEYSCK,S):: IF S<¢ 
1 THEN 10040 


10050 CALL DELSPRITEC#5, #6, # 

7,#10):: CALL HCHAR(11,19,32 

2:3: CALL HCHARC7, 20,32): 
CALL SPEAK(C *THE+ANSWER+IS"“ 

»SS) 

10060 SP=5 :: IF LENCSTRS$¢SO 

L>)=1 THEN C=160 ELSE IF LEN 

CSTR$(SOL))=2 THEN C=136 

ELSE C=112 

10070 FOR I=1 TO LENC(STRS$ (SO 

Ld:: X=VALCSEGS (STR$CSOL),I1 


»1)) 

10080 CALL SPRITEC#SP,ASC(ST 
R$(€X)),7,R,C):: C=C+24 :: SP 
=SP+1 :: NEXT I 


10090 IF LENCSTRS (NMC 1)))=2 
THEN Z1=VALCSEGS (STRS$ CNMC1)) 
»2,1) ELSE Z1=NMC1) 

10100 IF LENCSTRS$CNMC2)))=2 
THEN Z22=VALCSEGS (STRS (NMC2)) 
2,1) ) ELSE Z2=NMC2) 

10110 IF AS=49 AND 21+2Z2)>9 T 
HEN CALL HCHARC11,19,128) 
10120 IF AS=50 AND 21¢Z2 THE 
N CALL HCHAR(11,19,128):: CA 
LL HCHAR(7,20,128) 

10130 NMC1)=SOL :: CALL NUMS 
P(BS(),NM(),SS, 1) 

10150 DISPLAY ATC22,1):"pres 
Ss space bar to CONTINUE" 
10160 CALL KEYSCK,S):: IF S<¢ 
1 THEN 10160 

10170 CALL DELSPRITECALL):: 
CALL HCHAR(11,19,32):: CALL 
HCHAR(7,20,32):: SUBEND 


SOFTEX SUBSCRIPTION 


SOFTEX MAGAZINE CAN ONLY CONTINUE IN PUBLICATION IF WE HAVE AN ASSURED NUMBER OF 


SUBSCRIBERS. 


EARLY RENEWAL OF SUBSCRIPTION WILL GREATLY ASSIST IN THE ASSURANCE OF THE FUTURE 


OF SOFTEX. 


PLEASE 


ADDRESS.«eaee 


ENROL ME FOR 
CHEQUE/MONEY ORDER FOR $ 


NAME 2 sc 2454-415 oes ooo eee eed thee 


SUBUR Biss wae at aid inariaaee as 

DI ATES vseieaeerreensecemeis 
POSTCODE wtinwamegex 

ees ISSUES OF SOFTEX 


MAGAZINE. I ENCLOSE 


SOFTEX Dec. 1984 29 


MENU-MAKA 


By Peter Bodey, Canberra 


WHAT IS IT? 


Apart from distinct troubles in spelling I 
also. have experienced many, futile hours’ in 
making a menu screen just right. 

For the uninitiated a menu screen’ appears 
in most programs and generally looks something 
like this: 


PRESS 
1. MORE MONEY. 
2. LESS TAX. 
3. INCREASED HOLIDAYS. 
4, ALL OF THE ABOVE. 
9. QUIT. 


Getting the right screen colour, text 
colour and exact positioning of text takes a 
disproportionate amount of time compared to the 
time to actually write the 'real' part of the 
program. Reading through an article on 
tokenized values for Extended Basic 
commands/statements I realised that it was an 
easy matter to write a program to write a 
program. 


MENU-MAKA was born out of tedium and_ the 


desire to use token values in a genuine program. 

The program allows you to place text on the 
Screen and then move all or parts of it to legal 
screen locations and to select the screen/text 
colours. When you are happy with your efforts 
the program required to recreate the screen can 
be saved in merge format for incorporation into 
your target program. You can even choose the 
line numbers used. 


THE PROGRAM. 


The underlying idea was to keep the user in 
CONTROL, as such all modes are entered and 
exited by CTRL(key). The function key is ONLY 
used to INSert characters, DELete characters, 
ERASE a line and FNCT (4 or =) to leave’ the 
program in disgust. 


On running the program the default screen 
and text colours appear and an 'L' shaped sprite 
shows up at_ position (1,1). Whenever the 'L' 
shaped sprite appears the screen is called the 
movement screen. All other modes can only be 
entered from the movement screen. CTRL C 
(Cancel) will bring you back from most other 
modes to the movement screen. 


Using the arrow keys ESDX only (do not use 
the FNCT key) you can place the sprite at the 
desired location, (NOTE: These keys are 
auto-repeat). 

When you have the correct position you are 
ready to ENTER text so press the ENTER key. The 
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normal flashing cursor appears, enter your text 
using the DEL, INS and ERASE keys in the normal 
manner if necessary. When finished the line 
press ENTER and the 'L' sprite will reappear at 
the start of the entered text. Again using ESDX 
you can reposition the sprite and enter more 
text as above. 


Suppose you now wish to move part or all of 
one line, move the 'L' sprite to the start of 
the line segment you wish moved and press CTRL R 
(Relocate). A four headed arrow. sprite now 
appears indicating that you can move (if legal) 
the segment in any of the four directions using 
ESDX. If you try to move the text such that a 
collision would occur then both lots of text 
move. (As usual CTRL C escapes this mode.) 


If you want the entire display moved press 
CTRL W (Whole screen) . 

then ESDX as before. (This is a slower 
routine so allow some time for the screen to be 
completely updated.) CTRL C - escape again. 


CTRL S_ (Screen) is used to_ select’ the 
required screen’ colour, pressing any key after 
CTRL S causes the screen colours to_ scroll 
continuously (not auto- repeat), § This means 
that you do not have to remember or look up’ the 
colour codes for the various colours. When you 
have the colour you wish press CTRL C., 


CTRL L (Letters) works in the same manner 
as the screen colour but is used for the text or 
letter colour. 


CTRL T (move Through) is used to move an 
entire line through another’ line to swap the 
order of your menu. (Remember CRTL R_- moved 
along with the target line any other lines it 
encountered.) 


CTRL Q (Quit) to leave altogether, select a 
new screen or as a_ fail safe, redisplay the 
screen you just left. 


CTRL E (Exit to write program) The program 
can now. be saved using any name you wish. The 
line numbers to start and increment by are also 
chosen by you. 


CTRL P_ (Printout) Allows an abbreviated 
printout of the CTRL keys you can use and their 
function. It is recommended that you do this 
whilst still learning to use the program. 


CTRL M (Menu) Gives you access to 12k of on 
screen instructions, if you can remember that 
much! 


Final reminder: Use CTRL C 
modes, other modes can only be accessed via the you can see it is almost as 


movement screen ('L' sprite). 


to exit most 


writing your own program to write a program. As 
tedious as 
generating the menu in the first place. There 

is a good opening for someone to write a program 


To get the most out of the program you must to take the drudgery out of writing programs 


experiment, the instructions seem overwhelming 


that write programs! 


at first but are in fact fairly easily mastered. 


Remember also that the program was designed for 2; 
screen 


fine tuning of a 
rearrangements. 


NOTES TO INTERESTED PERSONS. 


l The actual MERGE 


written at lines 340+. 


format 
I have, against 


In order to cut down on multiple’ IF 
not major THEN logic testing statements I used the 
familiar ON POS(..... ) which presented a problem 
as I was testing for non-displayable CTRL 
characters. The easy way around this was. to 
subtract from the key value 60 (decimal) which 
program is now moves the keys’ selected back to have 


my own displayable characters (Line 280). 


worst programming habits, included a few comment 


lines to allow you to use this as 


80 ! Program MENU-MAKA 
Extended Basic 

90 ! Copyright Softex P/L 

Written by Peter Bodey 12/84 
100 OPTION BASE 1 :: DIM LS¢ 
243::3: A$S$=RPTSC* “,28):: FOR 
T=1 TO 24 :: LSCID=A$ 3: 
NEXT I :: SK=8 :: SC=2 

110 CALL CLEAR :: DISPLAY AT 
€2,5):RPTSC("x",18):: DISPLAY 


AT¢C3,5):"x 

xk“ :: DISPLAY AT(C4,5):"x 
MENU GENERATOR x” :: DISPLAY 
AT(5,5): "x 

x" 


120 DISPLAY AT(6,5):RPTS( "x" 
»18):: DISPLAY AT(11,3): "If 
you need instructions” ;: 

: DISPLAY AT(13,2):"press ’C 
TRL M’ anytime when” 

130 DISPLAY ATC15,2):"the ’°L 


’ shaped sprite is on” :: DI 
SPLAY ATC(17,2): “the scre 
en; you will not” :;:: DISPLAY 


AT(19,2):"lose any data.” 

140 GOSUB 1590 

150 GOTO 170 CALL CLEAR ; 

: CALL CHAR :: CALL DELSPRIT 

E :: CALL COLOR :: CALL 

SPRITE :: CALL LOCATE :: CAL 

L KEY :: CALL MAGNIFY :: CAL 

L SCREEN 

160 CALL SOUND ;:: X :: : 

Ko se-S:- oe 1S sR 22 C0. 3s FS 
se B26. 2S Se Bote (Ds: 
Fo3:: G$ 3: [t@P- 

170 CALL CHAR(C 136, "030303030 

3030303030303000000000000000 

OND0DNDN0NDND000OFCFCO000000 

000"):: CALL MAGNIFYC3):: CA 

LL CLEAR :: Y=1 :: X=9 

180 CALL CHAR( 140, “000000000 

00 10000000000000000000010380 

0008 28382000038 100000000 

000"):: CALL SCREEN(C8) 

190 CALL SPRITEC#1,136,SC,Y, 

X) 

200 CALL KEYC(5,K,S):: IF S=0 
THEN 200 ELSE IF K=13 OR Kd 

130 THEN 280 

210 IF K>96 THEN K=K-32 


an aid to Good luck with the program, I hope it will 


become a useful Utility for you. 


220 ON POSC"ESDXK" ,CHR$ CK), 1) 
+1 GOTO 270,230,240, 250, 260 


400 IF SC=2 THEN 430 ELSE Z$ 
=CHR$( 140) &CHR$ (73) &CHRS$ C190 


230 Y=Y¥-8 :: X=X :: GOTO 270 .&CHRS$ C200) &CHRS C1) &"O"& 
240 Y=¥ :: X=X-8 GOTO 270 CHR$ (177) &CHRS$ (200) &CHRS (2) & 
250 Y=Y :: X=X+8 :: GOTO 270 "12" &CHRS$ C130) &CHR$ C157) 
260 Y=¥+8 :: X=K 410 Z$=Z$&CHRS (200) &CHR$ (5) & 
270 GOSUB 1550 CALL LOCAT "COLOR" &CHR$ (183) &CHR$ (73) &C 
EC#1,Y,X):: GOTO 200 HR$ (179) &CHR$ (200) &CHRS ¢ 


280 IF K>130 THEN 320 
290 GOSUB 1540 ACCEPT ATC 


R,CISIZEC-29+C):1$ IF LEN 7,$=2$&CHR$(130)&CHR$(150 
C1$)=28 THEN LSCRO=IS :: )&CHR$(73):: GOSUB 500 

GOTO 190 420 !FOR I=O TO 12::CALL COL 
300 IF C=1 THEN LS$CR)I=I$&RPT OR(I,SC,1)::NEXT I 


BY&STRS CSC) &CHRS$ C179) &CHRS$ C2 
OOI&CHRS C1LI&" 1L"&CHRSC182):: 


$(" ",28-LENCI$)):: GOTO 190 430 FOR I=1 TO 24 :: C=0:: 
310 L$(R)=SEG$(L$(R),1,C-1)& E=29 IF L$CI)=A$ THEN 490 
I$&RPT$(" *,29-C-LENCI$)):: 440 C=C+1! :: IF SEGS(L$(1I),C 
GOTO 190 ,1)=" * THEN 440 

320 ON POS("GIPATUVWIX", CHR$ 450 E=E-1 IF SEGS$(L$(1),E 


(K-60),1)+1 GOTO 200,330,340 
2510,550,1150,1240,1290, 
1490,1610,1770 
330 GOSUB 1750 :: GOTO 190 
340 CALL DELSPRITECALL):: CA 
LL CLEAR :: DISPLAY ATC8,1): 
“MERGE FILE: DSK1." :: 
ACCEPT ATC(8,17)SIZEC-12):FS 
IF ASCCF$)=131 THEN 1580 


»1)=" “ THEN 450 

460 B=LENCSTR$(I)):: D=LENCS 
TRSCC)):: F=E+1-C GS=SEG$ 
(L$(1I),C,E+1-C):: 2S=CHR 
$0162) &CHR$ (240) &CHRS (183)&C 
HR$ (200) &CHRS CBD &STRS CI) &CHR 
$€179) &CHRS$ (200) &CHRS$ (CD) 
&STRS$ (CI&CHRS C182.&CHRS$C181> 
&CHRS$ (C199) 


350 FS="DSK"&FS :: OPEN #2:F 470 ZS=ZS&CHRS$ CF D&G$ 32: GOSU 

$,VARIABLE 163 DISPLAY AT B 500 

(12,3): "NITIAL LINE No. 480 !DISPLAY ATC(1,C):"“MESSAG 

> 10" : ACCEPT AT(12,22)SIZ2 E“ FOR EACH NON BLANK LINE 

EC(-SVALIDATECDIGIT):X :: IF 490 NEXT I :: PRINT #2:CHRS( 

X=O THEN 350 255.&CHR$(C255):: CLOSE #2 :: 
GOTO 1240 


360 DISPLAY AT(16,1):"INCREM 
ENT LINES BY: 10" :: ACCEPT 


s 500 PRINT #2:CHRSCINTCK/256) 
ATC16,22) VALIDATECDIGIT 


Y&ECHRS CX-256XKINTCX/ 256) &28& 


ISTIZEC-5):¥ IF Y=0 THEN 3 CHR$(€O):: X=K+Y RETUR 

60 N 

370 CALL CLEAR DISPLAY AT 910 CALL DELSPRITECALL) 
(12,4): "WORKING...... “ 32 B= 920 CALL KEYCO,K,S):: IF S<l 


LENCSTRS$ (SK) ) 

380 ZS=CHR$ (157) &CHRS (C200) &C 
HR$(5)&" CLEAR” &CHRS (130) &CHR 
$€157)&CHRS$ (200) &CHRS (6) 

&" SCREEN" &CHR$ (183) &CHRS$ (200 
Y&CHRS$ CBI&STRSCSKI:2: ZE=2ZEEC 
HR$¢(€182):: GOSUB 500 
B=LENC(STRS$(SC) ) 

390 !CALL CLEAR: :CALL SCREEN 
(SK) 


THEN 520 ELSE IF K=131 THEN 
190 ELSE SC=SC+1 
530 IF SC>16 THEN SC=2 
540 FOR I[=0 TO 12 CALL CO 
LORCI,SC,1):: NEXT I :: GOSU 
B 1750 GOTO 520 
550 CALL CLEAR :: CALL DELSP 
RITECALL):: DISPLAY ATC1,7): 
"*MENU GENERATORx" :: DI 
SPLAY AT(5,5):"1. INSTRUCTIO 
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NS.” 

560 DISPLAY AT(7,3):" 2. SCR 

EEN COLOR.” 

570 DISPLAY AT(9,5):"3. CHAR 

ACTER COLOR.“ :: DISPLAY ATC 
11,5):"4. RELOCATE.” :: - 

DISPLAY AT(13,5):"5. CANCEL 

MODE.” DISPLAY ATC(15,5):" 

6. PRINT INSTRUCTIONS.” 

580 DISPLAY AT¢(17,5):"7. SAV 

E MENU.” DISPLAY ATC(19,5) 
-"8. QUIT MENU.” :: DISP 

LAY AT(24,4):"YOUR SELECTION 
€1-8)?”" 

990 CALL KEYC(O,K,S):: IF K=1 
31 THEN 1580 ELSE IF S<1i OR 

K<49 OR K>56 THEN 590 

600 ON K-48 GOTO 610,820,850 
890, 1020, 1060,1110,1240 

610 CALL CLEAR DISPLAY AT 
€1,6):"=- INSTRUCTIONS -" :: 

DISPLAY ATC3,1):"The pur 

pose of this program” :: DIS 

PLAY ATC(5,1):"is to allow yo 
u to make up a" 

620 DISPLAY AT(7,1): “screen 

such as this, select” :: DIS 

PLAY ATC9,1):"your color 

s for both screen” ;:: DISPLA 

Y ATC11,1):"and character se 
ts move data” 

630 DISPLAY AT¢(13,1): "around 
the screen until you" :: DI 

SPLAY ATC15,1):"are happ 

y with it and then” :: DISPL 

AY AT(17,1):"obtain the exte 

nded basic" 

640 DISPLAY ATC19,1):"code i 

n MERGE format to be” :: DIS 

PLAY ATC21,1):“merged in 

to your program.” :: GOSUB 1 

990 :: IF K=131 THEN 1580 EL 

SE CALL CLEAR . 

650 DISPLAY AT¢(1,1):"The pro 

gram allows for the” :: DISP 

LAY AT(3,1):“*full 28 cha 

racters per line” :: DISPLAY 
AT(5,1)>:"“and so requires on 

e full” 

660 DISPLAY ATC(7,1)>:"line fo 

r each DISPLAY AT“ DISPLA 

Y AT(9,1):"statement. Fo 

r speed of" DISPLAY AT(11 
»1):"execution you should us 

ea” 

670 DISPLAY AT(13,1): "shrink 
utility to maximise” :: DIS 

PLAY ATC15,1): "your prog 

ram. The idea for" DISPLA 
Y ATC17,1)9:"this program was 
to speed up” 

680 DISPLAY ATC19,1):"time c 

onsuming creation of” :: DIS 

PLAY ATC21,1):"menus and 
fine positioning.” :: GOSUB 
1590 :: IF K=131 THEN 1580 

ELSE CALL CLEAR 

690 DISPLAY ATC1,1):"The pro 

gram has 3 main" DISPLAY 

AT(3,1):"screens,to esca 

pe from most” DISPLAY AT ¢ 
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5,1):"modes press CTRL C.” 

700 CALL SPRITEC#1,136,SC, 49 
»,9):: DISPLAY ATC7,4): "When 

this sprite appears” :: 

DISPLAY AT(9,1):"use the arr 

ow Keys ESDX to" DISPLAY 

ATC11,1):"place the spri 

te in the” 

710 DISPLAY AT(13,1):"locati 

on you wish to write” :: DIS 

PLAY ATC15,1): "part of y 

our menu. Press“ DISPLAY 

AT(17,1):"ENTER and commence 
typing.” 

720 DISPLAY AT(19,1):"DO NOT 
USE THE FUNCTION KEY" :: DI 

SPLAY AT(21,1):"°ONLY ESD 

X TO MOVE.” :: GOSUB 1590 :: 
IF K=131 THEN 1580 ELSE CAL 


L CLEAR CALL DELSPRIT 
ECALL) 

730 DISPLAY ATC1,1):"When en 
tering your lines the” :: DI 
SPLAY AT(3,1):"DEL,INS,E 
RASE and FCTN S & D” :: DISP 


LAY AT(5,1):"“kKeys can be use 
dad normally.” 
740 DISPLAY ATC(7,1):CHRSC30) 
DISPLAY ATC7,4):"“This is 

called the accept” :: DI 
SPLAY AT(9,1):"screen, the f 
lashing cursor" DISPLAY A 
TC11,1):"must be present 

for entry.” 
750 DISPLAY ATC(14,1):"°On com 


pletion of each entry” :: DI 
SPLAY AT(16,1):"press EN 
TER and the movement” :: DIS 


PLAY ATC(18,1): “sprite will r 

eappear for you" 

760 DISPLAY AT¢C20,1)3:"to pos 

ition with the ESDX" :;:: DISP 

LAY AT(22,1):"Keys as be 

fore.” :: GOSUB 1590 ;:: IF K 

=131 THEN 1580 ELSE CALL CLE 

AR 

770 DISPLAY ATC(1,1):"The fin 

al screen is called” :: DISP 

LAY AT(3,1):"the relocat 

e screen and the" 

780 DISPLAY AT(5,1):"sprite 

will appear at” :: CALL 

SPRITEC#1,140,8C,33,73): 
DISPLAY ATC7,1):"the posit 

ion of the movement” 

790 DISPLAY AT(9,1):"“cursor, 
the line can now be” :: DIS 

PLAY ATC(11,1): "moved wit 

h the ESDX Keys to” :: DISPL 

AY ATC(13,1): "the required po 

sition.” 

800 DISPLAY AT(15,1):°Use th 

e main menu for more” ;:: DIS 

PLAY ATC(17,1):"informati 

on. This can be" DISPLAY 

ATC19,1)3:"called up from the 
MOVEMENT” 

810 DISPLAY AT(21,1):"screen 
by CTRL M.“ :: GOSUB 1590 : 

- IF K=131 THEN 1580 ELS 

E 550 


820 CALL CLEAR DISPLAY AT 
(1,6):"# SCREEN COLOR #" 
DISPLAY AT(4,1):"To alte 
r the screen color” DISPL 
AY AT(6,1):"press CTRL S fro 
m the” DISPLAY ATC8,1 
»:"movement screen only. All 


830 DISPLAY ATC10,1):"“sprite 
s will then disappear” :: DI 
SPLAY AT(12,1):"and pres 
sing any Key will” DISPLA 
Y AT(14,1):"scroll through t 
he colors” 
840 DISPLAY AT(16,1):"contin 
uously. To stop at the” :: D 
ISPLAY AT(18,1):"selecte 
ad color press CTRL C." :: GO 
SUB 1590 :: IF K=131 THEN 15 
80 ELSE 550 
850 CALL CLEAR :: DISPLAY AT 
€1,5):"# CHARACTER COLOR #" 
DISPLAY ATC(3,1):"To a 
lter the character set” :: D 
ISPLAY AT(5,1):"press CTRL L 
(for Letters)” 
860 DISPLAY AT(7,1):"from th 
e movement screen.” DISPL 
AY AT(9,1):"Pressing any 
key will cause“ DISPLAY 
AT(11,1):"*the character set’ 
s color to” 
870 DISPLAY AT( 13,1): "change. 
in order. Allow time" :: DI 
SPLAY ATC15,1):"for each 
change. Once you" DISPLA 
Y ATC17,1):"are happy with t 
he color“ 
880 DISPLAY ATC(19,1): "press 
CTRL C to return to” :: DISP 
LAY AT(21,1):"the moveme 
nt screen.” :: GOSUB 1590 :: 
IF K=131 THEN 1580 ELSE 550 
890 CALL CLEAR DISPLAY AT 
€1,7):"# RELOCATE #”" :: DISP 
LAY ATC3,1):“Relocate is 
used to move” DISPLAY AT 
(5,1):"portions or whole lin 
es to a” 
900 DISPLAY ATC(7,1):"new scr 
een position with the" ;:: DI 
SPLAY AT(9,1):"keys ESDX 
From the movement” :: DISP 
LAY ATC1i1,1):"screen select 
the portion” 
910 DISPLAY AT(13,1):"start 
character you wish to” :: DI 
SPLAY ATC15,1): "move by 
positioning the“ DISPLAY 
ATC17,1)3:"movement cursor. P 
ress” 
920 DISPLAY AT(19,1):"CTRL R 


then move as desired.” :: D 
ISPLAY ATC(21,1):”"°CTRL C 
will escape this mode” :: GO 
SUB 1590 IF K=131 THEN 15 


80 ELSE CALL CLEAR . 
930 DISPLAY AT(1,1):"°# WHOLE 
SCREEN RELOCATE #“ 

940 DISPLAY ATC(4,1):"The who 
le screen can he“ DISPLAY 


AT(6,1):"moved in 4 dir 
ections using” DISPLAY AT 
(8,1):"ESDX keys after press 
ing” :: DISPLAY ATC¢(10,1) 
>"CTRL W (Whole screen). 

950 DISPLAY AT¢(12,1):"This w 
{ll occur only if no" :: DIS 
PLAY ATC14,1): "part of t 

he menu would be” DISPLAY 

AT(16,1):“lost in the shift 
-" :: DISPLAY AT(18,1):" 
NOTE: This routine takes" 
960 DISPLAY AT¢20,1):"some t 
ime, be patient.” GOSUB 1 
990 :: IF K=131 THEN 190 

ELSE CALL CLEAR 
970 DISPLAY AT(1,1):"# WHOLE 

LINE MOVE THROUGH #“ 

980 DISPLAY ATC3,1):"The ord 
er of lines in your” DISP 
LAY AT(5,1):"menu can be 
changed by” DISPLAY AT(C7 
»id:"placing the movement cu 
rsor” 

990 DISPLAY AT(9,1):"on the 
line you require and” :: DIS 
PLAY AT(11,1):"pressing 

CTRL T (Through). " DISPLA 
Y AT(13,1):"Now by pressing 
E or X you" 

1000 DISPLAY AT¢(15,1): "may m 
ove the line through" :: DIS 
PLAY AT(17,1):"other lin 

es to a clear line,” DISP 
LAY AT(19,1):"if one exists. 

No data will” 

1010 DISPLAY AT(21,1):"be lo 
st in this mode.” GOSUB 1 
590 :: IF K=131 THEN 190 

ELSE 550 
1020 CALL CLEAR DISPLAY A 
T(1,7)9:"# CANCEL MODE #" 
DISPLAY AT(3,1):"Pressin 
g CTRL C from most” DISPL 
AY AT(5,1):"“modes will retur 
n you to the” 

1030 DISPLAY AT(7,1):"moveme 
nt screen from which" :: DIS 
PLAY AT(9,1):"%all other 


screens/modes are" DISPLA 
Y AT(11,1): "selected. If you 
get into” 

1040 DISPLAY AT(13,1):"strif 


e try CTRL C then press" 
DISPLAY AT(C15,1):"CTRL M 

to give you the menu” :: DI 
SPLAY ATC17,1):"screen for h 
elp. This will" 

1050 DISPLAY AT(19,1):"not c 
ause loss of data.” DISPL 
AY AT(21,8): "EXPERIMENT! 


":3: GOSUB 1590 :: IF K=131 
THEN 1580 ELSE 550 
1060 CALL CLEAR DISPLAY A 


T(1,3):°# PRINT INSTRUCTIONS 
#" :: DISPLAY ATC4,1):”" 
As a handy guide to memory" 
DISPLAY AT(6,1):"the List 
of control keys" 
1070 DISPLAY AT(8,1):" 
y use can be printed” 


you ma 


1080 DISPLAY AT¢(10,1):“out b 
y pressing CTRL P from” :: D 
ISPLAY ATC12,1): "the mov 
ement screen or by" ;:: DISPL 

AY ATC 14,1):"pressing CTRL P 
now. This” 

1090 DISPLAY AT(16,1):"will 

give an abbreviated set" 

DISPLAY AT(18,1):"only. 

The full menu may be” 

1100 DISPLAY ATC20,1):; "neede 

ad for details.” :: GOSUB 159 

O :: IF K=131 THEN 1580 

ELSE IF K=144 THEN 1150 ELSE 
CALL CLEAR GOTO 550 

1110 CALL CLEAR :: DISPLAY A 

T(1,8):"# SAVE MENU #" :: DI 

SPLAY AT(3,1):"When you 

are satisfied with" DISPL 

AY AT(5,1):"the screen conte 

nts, color” 

1120 DISPLAY ATC7,1):"and ch 

aracter colors press" :: DIS 

PLAY AT(9,1):"CTRL E (Ex 

it preparation)" DISPLAY 

AT(C11,1):"enter the file nam 

e and line” 

1130 DISPLAY ATC13,1)3:"numbe 

rs you require. Your" :: DIS 

PLAY AT¢(15,1):"screen wi 

ll now be saved in” DISPL 

AY AT(17,1):"MERGE format fo 

r later use.” 

1140 DISPLAY AT(19,1):"You m 

ay then create a new” :: DIS 

PLAY AT¢C21,1): "screen or 
change the old.” GOSUB 1 

590 :: IF K=131 THEN 1580 EL 

SE 550 

1150 CALL DELSPRITECALL):: C 


ALL CLEAR DISPLAY AT(12,1 
»:"PRINTER: PIO" :: ACCE 
PT ATC12,10)SIZEC-7):FS :: I 


F ASCCF$)=131 THEN GOSUB 175 
QO :: GOTO 190 

1160 OPEN #3:F$,OUTPUT :: PR 
INT #3: TAB(C27)3 “MENU Seana 
OR MEMORY AID.": : : 

PRINT #3:"FOR ALL MOVEMENT @) 
F SPRITES ON THE SCREEN DO N 
OT USE THE FUNCTION KEYS 


1170 PRINT #3:"“ONLY THE ESDX 
KEYS ARE NECESSARY.": : : :; 
>: :: PRINT #3: “CONTROL 

KEY";TABC20);"FUNCTION": : : 
>: PRINT #3:TAB(5)3; "°C"; TABC 

20);"RETURNS TO MOVEMENT 
SCREEN.": : 

1180 PRINT #3:TABC5);"E";TAB 

€20);"WRITES SCREEN DETAILS 

TO DISK IN MERGE FORMAT. 

>: :: PRINT #3:TABC(5);"L"3 

TAB(20)3 "ALLOWS YOU TO CHANG 

E THE CHARACTER SET COLO 

RS2" 3: 3 
1190 PRINT #3: TABC(5)3°M*"; TAB 

€20);"“DISPLAYS MENU OF INSTR 

UCTIONS.": : :: PRINT #3 
>TABC5)3"P";TABC 20); “GIVES T 

HIS ABBREVIATED PRINTOUT. ”: 


1200 PRINT #3: TABC5);°Q"; TAB 
€Z20)3"°GIVES THE OPTION TO QU 
IT OR START A NEW SCREEN 


1210 PRINT #3:TAB(5)3;"R";$TAB 
€20);"ALLOWS YOU TO MOVE POR 
TIONS OF LINES OR WHOLE 

LINES.": : :: PRINT #3:TABC5 
»>;"S";TABC20)3; "ALLOWS SCREEN 
COLOR TO BE ALTERED. 

1220 PRINT #3:TABC5)3;°T";TAB 
€20);"MOVE TO A NEW POSITION 


THROUGH OTHER LINE(CS). 


1230 PRINT #3:TABC5)3"W"; TAB 
€20);"ALLOWS YOU TO MOVE WHO 
LE OF SCREEN IF POSSIBLE 


-"3 3: 3: CLOSE #3 GOTO 55 
0 

1240 CALL CLEAR :: CALL DELS 
PRITECALL):: DISPLAY AT(7,7) 


>"1. SAME SCREEN.” :: DI 
SPLAY ATC10,7):"2. NEW SCREE 
N."” :: DISPLAY AT(13,7):"3. 
EXIT.“ :: DISPLAY AT(19, 
6):"YOUR CHOICE (1-3)?" 
1250 CALL KEY(CO,K,S):: 
1 THEN 1250 

1260 ON POSC("123",CHRSCK), 1) 
+1 GOTO 1250,1580,1270,1280 


IF S< 


1270 CALL CLEAR CALL SCRE 
EN(C8):: FOR I=1 TO 12 :: CAL 
L COLORCI,2,1):: NEXT I 


:: DISPLAY ATC12,7): "STANDBY 

Reet "3: RUN 

1280 CALL DELSPRITECALL):: C 

ALL CLEAR :: END 

1290 GOSUB 1540 :: 

TEC#2,140,3C,Y,X) 

1300 CALL KEY(0O,K,S):: IF S= 

O THEN 1300 ELSE IF K=131 TH 

EN CALL DELSPRITECALL):: 

GOTO 190 

1310 IF K>96 THEN K=K=-32 

1320 ON POSC"EDSX",CHRS(K), 1 

»+1 GOTO 1300,1330,1380,1410 

» 1440 

1330 IF R=! THEN GOSUB 1760 
GOTO 1300 ELSE [=R-1 

1340 IF SEGSC(L$(1I),C,29-C)=R 


CALL SPRI 


PT$("“ “,29-C) THEN 1350 ELSE 
T=I-i :: IF I=0 THEN GOS 

UB 1760 GOTO 1300 ELSE 13 
40 


1350 IF C=1 THEN 1370 

1360 FOR I=I TO R-1i :: LSC¢I)D 
=SEG$ (L$(1),1,C- 1) &SEGS$ (L$ CI 
+1),C,29-C):: DISPLAY AT 
CI,1):L$¢C1):: NEXT I :: LSC¢R 
»=SEGS(L$C(R),1,C-1)&RPTSC" * 


>29-C):: DISPLAY ATCR,1) 
:L$CR):: Y=Y-8 GOSUB 1550 
:: GOTO 1290 


1370 FOR I=I TO Rel :: Osc) 

=L$(I+1):: DISPLAY ATCI,1):L 

$(CI):: NEXT I LS$CId=A 

$ :: DISPLAY ATC1I,1):L$¢(1)°:: 
Y=¥-8 GOSUB 1550 GOTO 
1290 
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1380 IF C=28 OR SEGS(LSCR),2 
8,1)<>"“ “ THEN GOSUB 1760 :: 
GOTO 1300 ELSE IF C=1 T 
HEN 1400 
1390 L$CR)=SEGS(LSC(R),1,C-1) 
&" “&SEGSCL$CR),C,28-C):: DI 
SPLAY ATCR,1):L$C(R)2:: X= 
X+8 :: GOSUB 1550 GOTO 12 
90 
1400 LSCR)=" "“&SEGSCLSC(R),1, 
27):: DISPLAY ATCR,1):LSC(R): 
: X=X+8 :: GOSUB 1550 
GOTO 1290 
1410 IF C=1 THEN GOSUB 1760 
:: GOTO 1300 ELSE IF C=2 THE 
N 1430 ELSE IF SEGSCLSC(R 
»,C-1,1)9<>" “ THEN GOSUB 176 
0 :: GOTO 1300 
1420 L$CR)=SEG$S(L$(R),1,C-2) 
&SEG$ (L$ CR) ,C,29-Cd&" “ 3s: D 
ISPLAY ATCR,1):LE$C(R):: X 
=X-8 :: GOSUB 1550 GOTO 1 
290 
1430 L$CR)=SEG$S(L$C(R),2,27)& 
" " 3:: DISPLAY ATCR,1):L$CR) 
:: X=X-8 :: GOSUB 1550 : 
GOTO 1290 
1440 IF R=24 THEN GOSUB 1760 
GOTO 1300 ELSE I=R#l 
1450 IF SEGS(L$C¢(1I),C,29-C)=R 
PT$C" ",29-C) THEN 1460 ELSE 
T=I+1 :: IF I=25 THEN GO 
SUB 1760 GOTO 1300 ELSE 1 
450 
1460 IF C=1 THEN 1480 
1470 FOR I=I TO R+ti STEP -1 
:: LSC I)=SEGS(L$¢C1I),1,C-1)9&S 
EG$(L$(I-1),C,29-C):: DI 
SPLAY ATCI,1):L$C(1I):: NEXT I 
>: L$CRI=SEGSC(LS$SCR),1,C-1)9& 
RPT$(" ",29-C):: DISPLAY 
ATCR, 1):L$(R):: Y=Y+8 :: GO 
SUB 1550 :: GOTO 1290 
1480 FOR I=I TO R+1i STEP -1 
2-3: L$CI>O=L$(I-1)3:: DISPLAY A 
TCI, 1):L$¢C1I):: NEXT I :: 
L$ (CR)=A$ DISPLAY ATCR, 1) 


Workstations cont. from page 17 


The second workstation we 


this month is one built by Mr. 
the Houston Users Group, U.S.A.. 


your computer. 


We intend to continue this column in future 
passing mention 


issues, and in 
inavative system seen where’ the 


was mounted facing up at_ the 
computer, with everything mounted onto a luggage 


carrier. 
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are featuring 
Bill Knecht of 
This is built 
out of Pine and shows another way of setting up 


Expansion Box 
rear of the 


°-L$CR):: Y=Y+8 3: GOSUB 1550 
:: GOTO 1290 

1490 CALL DELSPRITECALL) 
1500 CALL SCREEN(CSK) 

1510 CALL KEYCO,K,S):: IF S<¢ 
1 THEN 1510 ELSE IF K=131 TH 

EN 190 ELSE SK=SK+1 

1520 IF SK>15 THEN SK=1 

1530 GOTO 1500 

1540 CALL DELSPRITECALL):: R 

=INTCCY+14)/8):: C=INTCCX-1) 
/8):: RETURN 

1550 IF Y<1 THEN Y=1 :: GOSU 

B 1760 ELSE IF Y>185 THEN Y= 
185 :: GOSUB 1760 

1560 IF X<9 THEN X=9 :: GOSU 

B 1760 ELSE IF X>225 THEN X= 
225 :: GOSUB 1760 

1570 RETURN 

1580 GOSUB 1750 :: GOTO 190 
1590 DISPLAY AT¢(24,1):"*xPRES 

S ANY KEY TO CONTINUEx" 
1600 CALL KEY(0O,K,S):: 
1 THEN 1600 ELSE RETURN 
1610 CALL DELSPRITECALL) 
1620 CALL KEY(0O,K,S):: IF S= 

O THEN 1620 ELSE IF K=131 TH 

EN 190 

1630 IF K>96 THEN K=K-32 
1640 GOSUB 1880 ON POSC"E 

SXD" , CHR$(K),1)+1 GOTO 1620, 
1650, 1670,1700,1720 

1650 IF L$(1)=A8 THEN 1660 E 


IF S< 


LSE GOSUB 1760 :: GOTO 1620 
1660 FOR I=1 TO 23 :: LS¢ID= 
L$cI+1):: NEXT I L$(24).=A 


$ :: GOSUB 1750 :: GOTO 

1610 

1670 FOR I=1 TO 24 :: IF SEG 

$(L$CI),1,1)9<¢>" ° THEN GOSUB 
1760 :: GOTO 1620 


1680 NEXT I 
1690 FOR I=1 TO 24 :: L$C¢ID= 
SEGS$(L$(1I),2,27)&" “ 3: NEXT 


I :: GOSUB 1750 :: GOTO 
1610 
1700 IF L$(24)=A$ THEN 1710 


one very 


ELSE GOSUB 1760 :: GOTO 1620 
1710 FOR 1=24 TO 2 STEP -1 : 
L$CI)=L$¢I-1):: NEXT I :: 

L$(1)=A% :: GOSUB 1750 

: GOTO 1610 

1720 FOR I=1 TO 24 :: IF SEG 
$(L$C1),28,1)2<>" * THEN GOSU 
B 1760 :: GOTO 1620 

1730 NEXT I 

1740 FOR I=1 TO 24 :: L$C(I)= 
" “"SSEG6(L$(1I),1,27):: NEXT 
I :: GOSUB 1750 :: GOTO 

1610 

1750 X=9 :: Y=1 :: FOR I=1 T 

O 24 :: DISPLAY ATC(I,1):LS(CI 
¥:: NEXT I :: RETURN 

1760 CALL SOUND(100,200,0):: 
RETURN 

1770 GOSUB 1540 

1780 CALL KEY(0O,K,S):: IF S= 
O THEN 1780 ELSE IF K=131 TH 
EN 190 

1790 IF K>96 THEN K=K-32 
1800 I=1 :: GOSUB 1880 :: ON 
POS( "EX", CHR$(K),1)+1 GOTO 
1780, 1810,1840 

1810 IF R=1 THEN GOSUB 1760 
:: GOTO 190 

1820 IF L$(R-1I)<>A$ THEN 183 


O ELSE LS$C(R-I)=L$S(R):: LSCR) 

=A$ :: R=R-1 GOTO 186 

O 

1830 1l=I+1 IF R-I<1 THEN 

GOSUB 1760 GOTO 190 ELSE 
1820 

1840 IF R=24 THEN GOSUB 1760 
:: GOTO 190 


1850 IF L$C(R+I)<>A$ THEN 187 


O ELSE L$CRtHI)=LS$C(R):: LSCR) 

=A$ :: R=R+tI 

1860 GOSUB 1750 :: GOTO 1780 
1870 I=I+1 :: IF R+I>24 THEN 
GOSUB 1750 :: GOTO 190 ELSE 
1850 


1880 CALL SOUND(-150,2000,0) 
>: RETURN 


Assembly Language 


Disk Cataloguer 


By Peter Bodey, Canberra 


A PROGRAM OF SORTS. 


When the book ‘Programs for the TI Home 
Computer' by Steve Davis was published I raced 
out to buy a copy. I found the overall standard 
of the book and the number of useful programs to 
be very disappointing. One of the apparently 
better programs was _Disklister. While I had 
very few programs and files on disk this worked 
well. One day I inadvertently attempted to load 
more than the allowed 300 program names and _ an 
error message ensued _ with total loss of data. 
With the error handling features provided in the 
TI 99/4A XBASIC cartridge this seemed 
inexcusable. With 10 minutes of disk feeding 
down the drain I changed the DIM statement to 
DIM B$(400) and started again. It turned out 
that I had 302 programs, which didn't cheer me 
up greatly. Then came even worse news, 45 #!$% 
minutes to sort them; which is _ obviously 
useless. Something had to be done. 


I'd been kidding myself for quite a _ while 
that the next program I would attempt was an 
assembly level one; here was a need for’ much 
greater speed so no excuse was left to skim past 
9900 coding. 


The guiding principles were very simple: 


1, Speed; 
2. No data loss if the available space is 
exhausted. 


To accomplish high speed would require some 
clever sort such as a Binary Tree Sort or Shell 
Sort. After spending 3 or 4 fruitless days 
wishing I could buy RAM/ROM_ chips for my _ own 
brain (there's plenty of space there folks) I 
gave up and settled on the mundane Bubble Sort. 
This is extremely simple to code (about 10 
minutes} but works at _ snail pace. Realising 
that there was a lot of wasted time after a disk 
is read and the ‘little red light' is still on, 
an attempt was made to complete sorting before 
the next disk could be inserted. This has the 
advantage that at any time a printout can be 
made of a subset of disks if some care is taken 
in the feeding order. It also appears to make 
the sort take no time at all. The in use light 
remains on for 3.8 seconds after reading the 
final catalog item, yet the DSRLNK is no _ longer 
using the 9900 processor, only the disk manager 
card neon flashes merrily away. 


An upper limit of 3.8 seconds for the sort 
was now set. Naturally I failed. The first 
attempt had a worst case sort time of 80 seconds 


Fg. File names in memory 


(shades of Steve Davis!). A simple look at the 

sort showed that only Byte comparisons were 
made, pretty silly for a 16 bit machine. A 
quick change to Word comparisons dropped the 
worst case time to 38 seconds; still snail's 

pace. 


I should mention that in the worst case, I 
loaded a_é disk with 74 fairly similar names on 
(ie. many comparisons needed) over and_ over. 
When some 518 names_7 were loaded I re-fed the 
same disk and timed the sort period. 


A little thought and I soon’ realised that 


the task was not to sort the items merely to 
merge them. 


New disk file name 


APPLE BANANA 
CARROT ORANGE 
TURNIP POTATO 


Note that each list is itself sorted, once 
BANANA _ is placed below APPLE then the sort need 
never look at APPLE or BANANA again etc. this 
reduces the total number of comparisons to be 
made, The worst case sort now had _ dropped _ to 
just under 15 _ seconds. Still too long but 
enthusiasm and ideas were waning. 


The Shell Sort is reputedly many times 
faster, maybe next time... 


In the actual field test, 40 disks were 
loaded with a total of 620 program/file names, 
the final list was saved to disk and printed out 
(PIO only for this program) all in less than 25 
minutes. Most of this time was in disk drive 
feeding and reading. Only for 2 of the disks 
did the sort take longer than the allowed 3.8 
seconds. One disk had the 74. similar names 
mentioned previously and the other had 30 names. 
The average disk with about 10 programs’ was 
easily handled. 


The buffer size is for 625 files only, if 
you attempt to load more than this an_- error 
message is displayed with out leaving’ the 
program and the files can still be printed out 
and/or saved to disk in DIS/VAR 80 format. This 
format allows it to be loaded into the Editor 
Assembler or TI Writer's Editors for 
re-formatting or use of the © string search 
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function when only remember part of the 


name, 
It can then also be printed out to 


other type of printer using the TI Writer device 
service routines. As the original Disklister 

was in XBASIC it was only fair to make an XBASIC 
version of this program too. Both versions run 
at about the same speed but the Ed/Ass. version 
loads in 8 seconds where the XBASIC loader takes 
46 seconds. In both versions beep/honk sounds 
are made at the appropriate points to alert the 
user. The number of program/file names loaded 
is displayed after each disk is sorted and an on 
screen display of the sorted items, 20 at a 
time, is available for review. (This display 
can also be_ used in conjunction with the LOAD 
FROM DISK option for those without a_ parallel 
printer.) 


you 


any 


The references used in order of usefulness 


were: 
1. Paul Cass (TICHUG) for his invaluable 
help at many stages and_ his beep/honk 
routines, 


2. ‘Introduction to Assembly Language for 


the TI Home Computer' by Ralph Molesworth. 


3. Mini Memory manual. 


4, Editor 
everything is here 
small comments. 


Assembler 
but 


manual. Nearly 
often hidden in 


5: The July 1983 edition of '99er Home 
Computer Magazine' page 16 article ‘Never 
out of Sorts’. 


PROGRAM NOTES 


SOFTEX has included the Source Code for the 


Assembly Language version of the Disk Lister 
program. To type this in you need the full 
DEF LOOO44 
REF VMBW,VSBW,VWTR,KSCAN, DSRLNK,VMBR,VSBR 
GRMRA EQU »>9802 
GRMWA EQU »>9C02 
GPLWS EQU »>83E0 
LOO38 EQU »>8374 
L39 EQU >8375. 
LOO0O40 EQU- »>837C 
LOO41 BYTE »>36 
LOO042 BYTE >31 
LOO043 DATA >0000 
EVEN 
LOOO44 LWPI L117 
LI RO, >2E00 
CLR Rl 
LO45 MOVB RO, @LO0130(R1) 
INC Rl 
CI R1,15000 
JNE L045 
LI RO, >0380 
LI Rl ,>FCOO 
LOO046 BLWP @VSBW 
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system and a Editor/Assembler Module. 
haven't 
in, SOFTEX has available a Disk with 
code, 
Extended Basic Loading 
would like to thank B. 
for the DSRLNK program 


who 
source 
Memory). 


W.A. 
this. 


We 


the 


the 


For those 


time or patience to type this 
above 
the 


the 
assembled program 
version (requires 


required 


and 
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to 


K 


Elsner of 


run 


The program Disk can be obtained by sending 


$10.00 


A 
article. 


LOO47 


L048 


L049 
LO50 
LO51 
L052 
L053 
LO54 
LO55 
L056 


(Postage 


paid) to 
Landstrom Quadrant, Kilsyth. 


Softex 
3137. 


P/L., 


sample _ print 
CHARA bess ease TIMP 
DUCT 14-5 see ances TIMP 
DO 6a ae ee aS TIMP 
BDLTAL ewes TIMP 
BEDI TA22-¢é.0c%4% TIMP 
FORMAIL........ TIMP 
FORMA2........ TIMP 
OAD ie: sie shore cea TIMP 
MANAGER....... TIMP 
MEDICAL....... TIMP 
MPBASE........ TIMP 
MPCHAR........ TIMP 
MPDATA........ TIMP 
MPALP 06-4 : TIMP 
MPINTR vsc4 35.0 TIMP 
NAVHELPO...... TIMP 
NAVHELP1...... TIMP 
NAVREP........ TIMP 
NAVSET........TIMP 
NAVSORT....... TIMP 
OVERLAY....... TIMP 
SEEDGEN....... TIMP 
SE DUP acco % o-eees TIMP 
UDC ansere tks TIMP 
ONE loko .5s58. ch tene TIMP 


TEXT 
TEXT 
TEXT 


LOOO57 DATA 


RO 
RO 
LO 
RO 
@V 
LO 
RO 
R1 
@V 
RO 
RO 
LO 


tx 


,>038F 
046 
»>070C 
WTR 

60 


SBW 


» >0300 
48 


DISK SORTER *' 


"PRESS! 


"6 


5000 


NEXT DISK.' 

SHOW ON SCREEN.' 
PRINT LIST.' 
SAVE TO DISK.' 
LOAD FROM DISK.' 
OULT a. 


8, >0063,>00A8,>0108 
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out is included with this 


LO00058 


LOOO59 
LO60 


L061 


L00062 


L063 
L64 
L065 
LO0066 


L00067 


L68 
Ll 


LO069 


L070 


LOO71 


LO0072 


>0168, >01C8,>0228, >0288 
L049,L050,L051,L052 
LO53,L054,L055,L056 
>OFO5, >0D12,>0E10,>1208 
@L0047 

R3 

R4 

@L00057(R3),RO 
@L00058(R3),R1 
@LO0059(R4),R2 


L0066 


"OOO FILES LOADED (625 MAX.)' 


@L00043,R2 
@L063,R1 
R1,R2 


R1,8 
R1,@LO00062 
Rl 

@L065,R1 
R1,R1 

L0069 

R1,48 

R1,8 
R1,@LO0062+1 
R2,48 

R2,8 
R2,@L00062+2 
RO, >2E2 
R1,L00062 
R2,28 

@VMBW 

L070 
R6,>3100 
@L00062,R6 
Ll 

L68 

@L138 

L0139 

R7 

R6 
R6,@L0038 
@L00116 
@KSCAN 
R7,@L39 
L0071 
@L39,@L0041 
L0071 
@L39,@L0042 
L0071 


LO109,L0111,L0112,L0113,L0114,L115 


R8 
@L39,R8 
R8,8 
R8,-49 
R8,1 


L073 


LO74 
L00075 
L76 
LO77 
L0078 
LO0079 
LOO80 
LO81 
L0082 


L083 
L084 
LO85 
L086 
L087 


L00088 


L0089 


LO90 


LO91 


L092 


@LO00072(R8),R9 

@L0047 

*RO 

L060 

Z 

GPLWS 

@>0000 

>8356 

>1000 

>F80 

>02 

>O1 

>03 

>OA 

>00 
>000D,L00075,>0000, >0000, >0005 
'DSK1 

"DISK NAME:' 

"FILE NAME:' 

"BUFFER FULL-PRINTOUT SUGGESTED' 
"*PRESS ANY KEY TO CONTINUE*' 
"SORTING..... 


@L00043,@L00144 
RO,L76 
R1,LO082 
R2,18 
@VMBW 
R6,L76+9 
R6,@LO074 
@DSRLNK 

8 

LO91 
@LO77,R1 
RO,L76 
@VSBW 
R6,@L074 
@DSRLNK 

8 

LO91 

RO, >OA4 
R1,L083 
R2,10 
@VMBW 
RO,L00075+1 
R1,L0129 
R2,10 
@VMBR 
RO,LOO0O75 
@VSBR 
R1,@L0080 
LO90 

R1,8 

RO, >2900 
RO, @LO129(R1) 
RI 
R1,>Q00A 
LO90 
L0089 

RO, >OAF 
R1,L0129 
R2,10 
@VMBW 
RO,>184 
R1,L084 
R2,10 
@VMBW 
L092 
@L00137 
L101 
R6,@L074 
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L0093 MOVB 


L94 LI 


LO95 MOVB 


LOO96 MOV 


LOO097 MOVB 


L98 MOV 


L100 BL 


L101 RTWP 
LO0Q102 MOV 


A 
L00103 LI 
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@DSRLNK 

8 

L100 

RO, LOOO75 
@VSBR 
R1,R9 

L100 

RO, LOOO075+1 
R1,L0128 
R2,10 
@VMBR 
RO,LOOO75 
@VSBR 
R1,@L081 
R1,@LO0080 
L94 

R1,8 

RO, >2000 
RO, @LO128(R1) 
Rl 
R1,>0O00A 
L94 

L0093 

RO, >18F 
R1,L0128 
R2,10 
@VMBW 
@L00043,R8 
Rl 
@LO081,R7 
R7,8 
@LO128(R1),@L00130(R8) 
R8 

Rl 

R1,R/ 
L0096 

L095 
@L00043,R8 
R8,14 

Rl 
@L0129(R1),@L00130(R8) 
R8 

Rl 

R1,10 

L98 

L0097 
R8,@L00043 
R8,14976 
L092 
@L0047 

RO, >162 
R1,L085 
R2, 30 
@VMBW 
@L138 
L0140 
@L00132 
@L0134 
@L0047 
RO,>16A 
R1,L087 
R2¢-12 
@VMBW 
@L110 


@L00043, @L00043 
L00106 
R10,L00130 
R10,R9 
@L00043,R9 
R6,>024 
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L104 


LO105 


L00106 
LO107 
L0108 


L0109 
L110 
LO111 
LO112 
LO113 
LO114 
L115 
L00116 
L117 
L118 
L119 
LO120 
LO121 
L122 
L123 
L124 
L125 
L00126 
L00127 
L0128 
LO129 
L00130 
L0O131 
LO0132 


LO133 


L0O134 


LO0O135 
L00136 
LO0O137 


R6, RO 
R10,Rl 
R2,24 
@VMBW 
R10,24 
R10,R9 
LO105 
R6,>020 
R6,>2A4 
LO105 
L104 
@L00132 
R10,R9 
L00106 
@LO0047 
L00103 


>FFOO 
@KSCAN 
@L39,@L0107 
LO108 


L0120,L00088 
L0121,L0145 
L122,L00102 
L123,L00021 
L124,L0030 
L125,L00009 
L00126,L073 
L118,L0108 
>20 

>20 

>20 

>20 

>20 


@L00040, RO 
L0133 


@L0078,R1 
RO,L/76 
@VSBW 
R6,@L074 
@DSRLNK 

8 

RO 

RO, @LO0040 


"DISK ERROR-CHECK DRIVE 1' 


O 
R11,@L00136 
@LO047 

RO, >163 
R1,L00135 
R2,24 

@VMBW 


L138 
LO139 
LO140 
L141 


LO142 


L00143 


L00144 


LO145 


L146 


LO147 


L148 
LO010 


LOO11 


LOOO12 


LOO13 


LOOO14 


LOOO15 


@L138 

L0140 
@L00132 
@L00136,R11 


L119,L141 
>0380,>0791,>0801,>9F00 
>0380,>2391,>0801,>9FO00 
*R14+,R1 

RO,>1000 

R2,8 

@VMBW . 

0 

RO, >1000 

RO, @>83CC 

@L0078, @>83FD 
@L0078,@>83CE 

2 

@>83CE,@>83CE 

LO142 

0 


24 

0 
@L00043,R11 
L148 
@L00144,R10 
L148 

RQ 
@L00130( R10) ,@LO0130(R9) 
LO0012 
L0010 

R9,24 
R9,@L00043 
L146 


R8 

R10,R7 

R9,R6 

R6 

R7 

R8 

R8,24 

L0O0012 
@L00130(R7),@LO0130(R6) 
LOO11 


R10,R7 
@L00130(R7),@L00143(R8) 
R/ 


R8 
R8,24 
L0013 
R10,R7 
R10,R5 
R8 
R5,-24 
R5,R9 
L016 


@L00130(R5) ,@LO0130(R7) 
R5 


R7 

R8 
R8,24 
LOOO15 
R7,-48 
R5,-24 
LOOO14 


L016 
LO17 


L018 
LO0019 


L0020 
LO0021 


LO022 


L0023 
L024 


BL 
MOVB 


R8 
@L00143(R8) ,@L00130(R3) 


R10,24 
R10,@L00043 

L148 

L0147 

"PRINTING TO PIO' 


>0012,L00075, >0000, >0000, >0004 


"PIO.' 

>1B40, >0D00 
@L00043,@L00043 
L0025 

@L0047 

RO, >166 

R1,L018 

R2,-L5 

@VMBW 

@GRMRA, @LOO127 


@GRMRA, @LOO127+1 
@L00127 

RO,L76 

R1,LOOO019 

R2,14 


‘@VMBW 


R6,L76+9 
R6,@L074 
@DSRLNK 

8 

LO0027 
R1,>0300 
RO,L76+5 
@VSBW 
@L0079,R1 
RO,L76 
@VSBW 

RO, LO0075 
R1,L0020 
R2,3 
@VMBW 
R6,@L074 
@DSRLNK 

8 

LOO0O27 
RO,L76+5 
R1,>1900 
@VSBW 

RO, L00075+24 
R1,>ODOO 
@VSBW 
R10,L00130 
R10,R9 
@L00043,R9 
RO,LOO0075 
R10,R1 
R2,24 
@VMBW 
R6,@LO074 
@DSRLNK 

8 

LOO027 
R10,24 
R10,R9 
L0023 
LO022 
@L0134 
@L00127,@GRMWA 
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NOP L037 a "READING DSK1.FILE-SORTA' 
GRMWA 
L0025 ue eee een te LO0009 BL @LOO47 
LO00026° TEXT 'PRINTER ERROR-CHECK PIO' LI RO,>121 
LOOO27 BL @L0047 LI R1,L036 
LI RO,>143 LI R2,29 
LI R1,L00026 BLWP @VMBW 
LI R2,23 BL @L00132 
BLWP @VMBW BL @LO0047 
BLWP @L138 Ld RO,>163 
DATA LO140 LI R1,L03/7 
BL @L00132 Lt R2,23 
JMP L024 BLWP @VMBW 
LO0028 DATA >0012,L00075,>0000, >0000, >O0OF LI RO,L76 
TEXT 'DSK1.FILE-SORTA' LI R1,L00035 
LO29 TEXT 'SAVING AS DSK1.FILE-SORTA' LI R2,25 
EVEN BLWP @VMBW 
LO030 MOV @L00043,@L00043 LI R6,L76+9 
JEQ L0033 MOV R6,@L074 
BL @L0047 BLWP @DSRLNK 
LI RO,>162 DATA 8 
LI R1,L029 JEQ LO007 
LI R2,25 MOVB @LO77,Rl1 
BLWP @VMBW LI RO,L76 
Lai RO,L76 BLWP @VSBW 
LI R1,L00028 LI RO,L76+5 
LI R2,25 LI R1,>0300 
BLWP @VMBW BLWP @VSBW 
LI R6,L76+9 MOV R6,@L074 
MOV R6,@L0O74 BLWP @DSRLNK 
BLWP @DSRLNK DATA 8 
DATA 8 JEQ LOOO07 
JEQ L0034 LI RO,LOOO75 
MOVB @LO0079,RI1 LI R1l,L00043 
LI RO,L76 LI R2,2 
BLWP @VSBW BLWP @VMBR 
LI R1,>0200 LI RO,L76+5 
LI RO,L76+5 LI R1,>1900 
BLWP @VSBW BLWP @VSBW 
Pel RO, LO0075 CLR R8 
LI R1,L00043 LI R10,L00130 
LI R2,2 MOV R10,R9 
BLWP @VMBW A @L00043,R9 
MOV R6,@L074 LOOO08 MOV R6,@L074 
BLWP @DSRLNK BLWP @DSRLNK 
DATA 8 DATA 8 
JEQ L0034 JEQ L0OO0O7 
LI R1,>1800 Lak RO,LOOO75 
LI RO,L76+5 MOV R10,R1 
BLWP @VSBW LI R2,24 
LI R10,L00130 BLWP @VMBR 
MOV R1O,RI AT R10,24 
A @L00043,R9 C R9,R10 
L00031 LI RO,LOOO75 JEQ L006 
MOV RIO,RI JMP LO0O008 
LI R2524 L006 BL @L0134 
BLWP @VMBW RTWP 
MOV R6,@L074 LOOO7 BL  @LO00137 
BLWP @DSRLNK JMP L006 
DATA 8 END L0O0044 
JEQ L0034 
Al R10, 24 NOTE: 
C R10,R9 
JLT L00031 This program is set up for a-'PIO' 
LO032 BL @L0134 only. 
L0O033 RTWP 
LO034 BL @L00137 Once Print-out is selected the user looses 
JMP L0032 


all control of the program until the _ printing 
actually commences. After this <FCTN 4> will 
cause an interrupt and the program’ will return 
to the MENU screen. 


LO0035 DATA >0014,L00075,>0000, >0000, >OOOF 
TEXT 'DSK1.FILE-SORTA' 
L036 TEXT 'DSK1.FILE-SORTA WILL BE READ.’ 
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Around the Groups 


Throughout Australia active groups of users have banded together to form part of 
an international link to spread tips, knowledge, programs and the latest news amongst 
each other. About 3 years ago Shane Anderson from Sydney began the task of trying to 
find other users of the TI-99/4. Gradually small groups began across Australia, until 
today there are in excess of 2000 members, without counting the spouses, children, 
relations and _ friends who also have some contact with the groups. If you are not a 
member of a group, then I strongly advise you to join one NOW as it will be up to’ the 
groups to find support and developments in the future with T.I. now out of the home 


computer market. 


In Australia all groups have kept together and shared news amongst themselves, so 
it is not an advantage to belong to one group in preferance to another, although 


logically the nearest one to you’ should’ be 


the one you _ join. All groups’ have 


newsletters, program libraries, mumerous overseas contacts etc.. However they each 


operate in different ways according to size, membership and assets. 


Following below 


are details, contacts, costs and services provided by the groups. It is our intention 


to publish meeting dates and news in further 


activities. 


up across the country, eg. Newcastle, Mt. 


larger groups. 


TI-99/4 Users Group Melbourne 


Co-Ordinator: Doug Thomas. 

Address: 59 Landstrom Quadrant, Kilsyth. 3137. 
Telephone: (03) 7258178. 

Membership Cost: $15.00 per 12 month period. 
Tape Membership: $35.00 for 6 C-60 Tapes with 15 
to 20 programs on each. Variety of programs’ on 
each, collected from local, interstate and 
overseas sources. Non members can join tape 
membership only for $40.00. Programs posted to 
all subscribers at 2 monthly intervals. 

Meetings: Held monthly Saturday afternoons at 
Victoria College, Burwood Rd., Burwood at 2.00 
pm.. 

Next Meeting:. To be advised, February 1985. 
Newsletter: Posted bi-monthly, offering news, 
tips, programs and details of next meetings. 

Fees sent to: TI-99/4 Users Group Melbourne, 123 
Ashburn Grove, Ashburton. 3147. 


T.I.C.H.U.G. (Canberra) 


Co-Ordinator: Von Klimpel 

Address: P.O. Box 610, Belconnen. A.C.T. 
2617. 

Telephone: (062) 588486 

Membership Costs: $18.00 per year. 

Meetings: Held bi-monthly. 

Tape Software: $5.00 ea., with 8 to 10 programs 
on each. 

Newsletter: CHUG.A.LUG, produced bi-monthly. 
Fees sent to: TICHUG, P.O. Box 610, Belconnen. 
A.C.T. 2616. 


issues to keep you informed of the 
In addition to the Capital City groups there are regional ones springing 
Gambier, who are. affiliated with the 


Doug Thomas. 


T.I.U.P. (Perth) 


Co-Ordinator: Les ‘l'wiss. 

Address: P.O. Box 246, Mt. Lawley. 6050. 
Telephone: (09) 2718642 

Membership Costs: $15.00 _ pa. or $10.00 pa. 
Newsletter only. 

Meetings: Held the third Saturday afternoon each 
month. Free copies of software is availiable at 
meetings, on supplying own C-90 tape. 

Newsletter: Published bi-monthly giving program 
listings, tutorials, and in depth reviews. 
Fees sent to: TIUP, P.O. Box 246, Mt. 
6050. W.A. 

Very experienced group of programmers who are 
leading the way with Assembler and other 
languages. 

Bulletin Board operating: Phone No: (09) 


Lawley. 


A.T.I.C. (Adelaide) 


Co-Ordinator: Fred Cugley. 

Address: 26 Suffolk Ave., Brahma Lodge. 5109. 
Telephone: (08) 2583499. 

Membership Cost: $24.00 pa. 

Meetings: Held ea. 6/8 weeks at a_ School, 
advised in Newsletter 

Newsletter: Published bi-monthly and posted. 
Program Tapes: Availiable at $6.00 ea. for 10 
good programs. The Group is currently going 
through a transition stage, with the 
Co-Ordinator and Secretary looking to stand down 
from their positions. 

Fees sent to: ATICC, 26 Suffolk Ave., Brahma 
Lodge. 5109. S.A. 


SOFTEX Dec. 1984 


37 


T.I.U.S.H.U.G. (Sydney) 


Co-Ordinator: Peter Varga. 
Secretary: John Robinson, P.O. Box 149, Pennant 
Hills. 2120. 
Telephone: (02) 8480956 
Membership Cost: $10.00 initial joining fee, 
$22.00 per 12 month period. 
Meetings: Held first Saturday each month (2nd. 
Sat. if Ist. a holiday weekend) at 2.00 pm. 
at St. Johns Church Hall, Victoria Street, 
Darlinghurst. Regional metings held between 
main meetings on various nights. 
Newsletter: Posted monthly, giving news, tips, 
programs, and future meeting details. 
Program Tapes: Sold $3.00 ea. at meetings, 
$4.00 ea. Posted. Each contain about 10 
programs, and are set themes, eg. Extended 
Basic, Ext. Basic Music, Games, Ord. Basic, 
Ord. Music, Speech. No subscription service, 
ordered separately. 
Fees sent to: TISHUG, P.O. Box 149, Pennant 
Hills. 2120. 
Features: Program Crisis Line. 

Bulletin Board for Modems, commenced 
1.07.84. Phone No: (02) 5600926. To register 
as a_ouser. write to: TI.S.H.U.G.BBS, P.O. Box 
995, Marrickville. 2204. 

Monthly Software Competition with prizes 
up to $50.00. 


TI Tas Users Group (Hobart) 


Co-Ordinator: Rex Shephard. 
Address: 1 Benboyd Crt., Rokeby. 7019. 
Telephone: (002) 476029 

(002) 294009.(Leon Lonergan) 
Membership Cost: $15.00 per year. 
Meetings: Meet every third Sunday of the month 
at the University of Tasmania from 2pm. to 4pm. 
in Room 373. 
Tape Software: $5.50 a C-60 tape ($9.00 SS/SD 
Disk) of user written programs. 
Newsletter: Bi-monthly. 
Fees sent to: 7.1. Tas Users Group, 7 Tarana 
Road, Blackman's Bay. 7152. Tasmania. 


T.I.B.U.G. (Brisbane) 


Co-Ordinator: Mr. Greg Lane. 

Address: P.O. Box 57, Aspley. 4034. 

Telephone: (07) 2641562 

Membership Cost: $22.00 pa. reducing on a 
sliding scale from September. 

Meetings: Held monthly, check for venue. 
Newsletter: Bug-Bytes, published monthly = and 
posted. 

Program Tapes: $5.00 ea. plus $1.00 Postage. 
Features: Programmers Hot Line. 

Operate several sub-groups in area. 

Home Computer Magazines is sold at meetings 
along with other odds and ends. 

Running an Assembly language workshop. 

Fees sent to: TIBUG, P.O. Box 57, Aspley. 
4034. QLD.. 


National TI-99/4 Users Group of Australia 


Co-Ordinator: Doug Thomas, 59 Landstrom Quadrant, Kilsyth. 3137. Vic. 


Functions as a co-ordinating role between the 
Does not actively organise functions 


various groups’ throughout Australia. 


or meetings except between Co-ordinators and 


other interest parties. Acts as a distribution point for Software and other Data 


received internationally. 
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TO ALL OUR READERS, 
A MERRY CHRISTMAS 
AND A "PEACEFUL", 

PROSPEROUS AND 
HAPPY New YEAR 
FROM ALL AT 


Erata 


Important Notes for Readers of "Introduction to Assembly Language for the TI 
Home Computer" by Ralph Molesworth. 


The following errors have been found by Rob Williams, of the Perth Users Group 


SE i a i i A i i i i 6 I i I 0 i ia i i ie i ia i i a 
Page 49 Replace VDP RAM ADDRESS DECIMAL=( (ROW-1) )*(COLUMWN- 1 ) 
With VDP RAM ADDRESS DECIMAL =( (ROW-1) ) + (COLUWN- 1 ) 
Page 67 Replace llth. line of program C R7,4 


With CI R7,4 
Page 68 Replace 4th. line of program CI R3,R7 

With C R3.R7 
Page 74 Replace 16th. line of program BYTE >0OF 

With BYTE >05 


In order to make program branch to main title screen when 'Quit' 
is pressed. 

Page 76 Replace Ist. line of program AORG >7D0C 
With AORG >7D30 
This is because enough space has not been allocated in the book 
for the Symbol table. For more information, read page 36 of the 


book. 
Replace 15th. line of program DATA >0F00 
With DATA >0500 
To make program branch to Main Title Screen when 'Quit' is 
pressed. 
Replace 5th. line up from page bottom BLWR @KS N 
With BLWP @KS 
Page 89 Replace 13th.line of program JLE CPUT 
With JL CPUT 


Otherwise 11 records will be written, not 10. 
Page 118 Replace 8th. line of program CLR STATUS 


With CLR @STATUS 
Page 119 Replace 2nd. line up from page bottom LI R0O,0755 
With LI RO,>0755 


Page 121 Insert after line 4 these two lines: 
CB @KEYVAL ,@ESCV 


JEQ ESCAP 
Page 122 Replace 10th. line of program 100 FOR LOOP=0 TO 16 
With 100 FOR LOOP=0 TO 14 
Page 123 Replace 4th. line of Assembly Program SBUFF BSS) 256 
With SBUF BSS 256 
Page 124 Replace 25th. line of program ERROR LI _ 0,>1300 
With ERROR LI RO,>1300 
Replace 26th. line of program BLWP @ER R 
With BLWP @ERR 


Page 127 Delete three words from the 7th. line of text: 
"or equal to", 

Page 130 Add one new line after line 20, i.e. between characters 90 and 
oi 
DATA >0000, >0000 
Four bytes of zeros must be added here to force correct loading 
in Pattern Descriptor Table of all characters from 91 to 143 


Page 131. Replace 4th. line up from page bottom LI R2,904 


With 


News Briefs 


TI-Writer and Multiplan Prices Rise. 


KEKEKKKKKEEKEEEKEEEKEKKEHE KEKE KLEE KEELE EEE KKEKKEKKKEEKE 


LI R2,912 


Games Modules Prices Fall. 


Prices of many games in module form have fallen 
sharply, both in the U.S. and here. Some 
modules are as low’ as $5.00 in the U.S., and 
under $20.00 here. 


KEKKEKKKEKEKKKEKKEKEKEKKEEEKEKEKEKEKEEKKEEKEREKREREKEKEEE 
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Softex Goodies 


SOF TEX PROGRAMS 


SOFTEX now has an exciting Assembly Language 
game for sale, known as 'Brick-Bat'. In this 
game you use the 'S' and 'D! keys to. reflect a 


bouncing Dall into a brick wall, demolishing it 

as you go. Very quick reflex action is required 

to succeed in this gaine. Available — either 
Cassette based requiring Mini-Memory for $12.00 

or on Disk with Extended Basic and 32K memory 
for $15.00. In the case of the cassette version 

this program is loaded using the normal 'OLD 
CS1' routine. Go on, give this a try. 


Programs froin issues | to 3 of SOFTEX Magazine 
are now available on tape for $12.00 or Disk for 
$15.00, postage paid. This is the quick way to 
precure these programs without having to type 
them in. 


Finance Advisor Program is available on Disk 
only for $12.00 postage paid. This program 
considers all avenues of loans, repayments, and 
which type of interest is cheaper, together with 

a tax program and _ budget. This program will 
soon tell you wheather vou can afford those 
extras you want. 


DATA BASE MANAGEMENT SYSTEM 


This program written in 
fast, and. allows up to 250 fields with 32000 
records (record size limited to 255 _ bytes). 
Comes as a Module and Disk, requires 32K memory, 
Disk Controller and Drive, and a RS232 interface 
with printer if output is required. Can use 
TI-WRITER files for reports, allows up to 80 
character formatting, using automatic scrolling. 

Very easy to set up file structure, Reports can 

be modified easily to display information 
required, Can be used for Membership and 
Mailing Labels, Invoicing, Inventory and any of 
thousands of uses. A must for the serious user 
of the computer. SOFTEX Price: $195.00, P&P if 
applicable $5.00. 


Assembly Language is 


Cartridge Expander. This lets you switch 
between 3 modules quickly without causing wear 
and tear on the Module port of your computer and 
saves you suffering from the dreadful curse of 
lock-up (see review issue No. 3). Price: 
$60.00 plus $3.00 Postage. 


Homework Helper. This program is a simple way 
for a student to make notes of School 
assignments, coupled with a simple Word 
Processor. A new model coming out has a_ spell 
checker and a 12000 word dictionary. Requires 
32K Memory and Disk Drive. Price $60.00 plus 
$3.00 Postage. 

99/4A Auto Spell Check. Comes with a 20,000 
word dictionary, can utilize as many user 


dictionaries required. 
oi 2 Disks. 


Excellent Program, coines 
Price $59.95 plus $3.00 postage. 


SLIM LINE DISK DRIVES 


SOFTEX Special - 4 only available, National 
DS/DD Disk Drives for sale for $220.00 Bare 
Drive, $330.00 with External Power Supply and 


Cable. Postage $10.00. 

Chinon DS/DD_ Disk Drive now only $300.00 Bare 
Drive, $420.00 with External Power Supply and 
Cables. Postage $10.00 


Also available 1 "pre-loved" External Disk 
Drive, SS/DD, for $200.00 complete with cabling, 
a 2 TI SS/DD Disk Drive Cards for $120.00. 


Contact SOFTEX for your Disk Drives for your new 
Corcomp Expansion System, we can supply double 
power supplies too, contact us for a price. 


PRINTERS 
AMUST  P88/2: Offers Pica/Elite Print, 
Proportional spacing, near letter quality 


printing and Standard printing up to 120cps. 
Price $490.00 plus $10.00 Postage. 

AMUST 80 DT/2: A much more rugged printer than 
the 80-DT, comes with proportional space 
printing also. Speed up to 100cps. 

Special Price: $340.00 plus $10.00 Postage. 


BOOKS 


SOFTEX still has some copies of Home Computer 
Magazine, Volume 4, Number 2 and Number 3_ only 
for $5.00. 


Back copies of SOFTEX still available for $5.00 
each, includes Postage. 


This is the 
wondering what a PC 
also. helps you 


Personal Professional Computers. 
book to buy if you~ are 
computer can do for you, it 
evaluate software available for them, giving 
soine examples of differences between popular 
Word Processing, Data Base, Accounting, Project 
vianagement, Communications, and Speech Programs. 
A well written book giving the reader a complete 
basic understanding on the use of PC Computers. 
If you want to know more, then this is available 
from SOFTEX for $20.00, plus $1.00 postage. 


Introduction to Assembly Language for the TI 
Home Computer Price: $28.00 plus $2.00 Postage. 


Programs for the TI Home Computer. 
plus $2.00 Postage. 


Price $24.00 


_ New Australian Disk Manager/Disk Fixer. This 
program is more than QYDisk Manager, or Disk 
Fixer, a real tool for Asseinnly ‘Language. Price 


$39.95 plus $1.00 Postage. 


SOFTEX SUPPLEMENT 


Commencing with this issue of SOFTEX we 
have included a supplement for advertising our 
goods, with this being available’ to other 
interested advertisers at $50.00 per page. 


This has mainly been done in order not to 
waste valuable space inside the magazine, and 
allows us to- give a fuller description of the 
products we carry. This will become a_ regular 
feature in future editions. 


As can be_- seen SOFTEX intends to support 
the TI-99/4A with the new CorComp_ Expansion 
system at a price well under the forcast price 
of $745.00. Remember we are '‘USER'S' of the 
TI-99/4A, and not just retailers selling a 
product. We stand by what we _ sell, and _ have 
developed a personal relationship with our 
suppliers so that we can_ provide the _ best 
service. 


SOFTEX does NOT operate 9am. to 5pm., as 

its Directors have to work elsewhere during the 
day to. earn a living, and therefore remind you 
that the telephone number is an after hours’ one 
only. We carry a Iimited stock of products, but 
can usually arrange to have’ your order filled 
within 1! to 2 days unless the wholesaler is out 
of stock. Our policy is to process orders’ by 
return mail if possible. 


If you do not see a product you wish to 
purchase listed in this supplement, don't 
hesitate to telephone’ and we will see what we 
can do for you. 


SOFTEX wishes all our Readers’ and past 
customers a Very Merry Christmas and a Happy New 
Year. 


Doug, Mary, Wayne and Ian. 


SPECIAL 


ee PRINTER, BARELY USED, 
WITH CABLE, TRANSFORMER, READY 
TO RUN, $360.00 PLus $12.00 Post. 


ERRATA. 


DUE TO PRINTER DEFAULTS THERE ARE GAPS 
IN THE PROGRAM THAT SHOULD NOT EXIST 
Va Roe CHARACTER FOR: - 

RACTICE AND 
MENU-MAKA. 


SEASONS GREETINGS 


SOFTEX P/L 
59 Landstrom Quadrant 


Kilsyth 3137 
Tel: (03) 725 8178 A.H. only. 
Item Cost 

P&P: 


Total Aust.: :$ 


Order by sending cheque or by Bankcard 


Name eeveeceve3e onoeeveveve oovevereeveveeeeev ee es ee eo 


wl. 
BANKCARD/MASTERCARD vo 
Account [TT (U] [TT] (LET TT 


Number 
I hereby authorise Softex P/L to charge my 
Bankcard/MasterCard Account the sum of $ eecesccevcees 
Expiry date ../../.. Min. Purchase $5.00 


STEM a GUC o6 56:40 eagle ace Go ee a ee ae ere ek 


Mirny Chrstras 


Make it eauy with Bankcard 


TI PROFESSIONAL 
COMPUTER 


Why not trade up to a Professional? 


System Unit 


Powerful 16-bit 8088 inicropressor 


UPGRADING YOUR 


ARE YQU CONSIDERING 
SYSTEM 


TALK "9 OF TEX ABOUT THE MANY FEATURES 
or THE T1-PROFESSIONAL COMPUTER 


Contact SOFTEX FoR A GREAT CHANGEOVER 


128K RAM standard, expandable to 768K bytes 
J60K byte (MS-DOS 2,1) bulle in disk drive 

8K byte system ROM 

Disk Contruller 

Keybourd interface 

dtundurd parallel printer port 

Monochruine/colur CRT controller with 4K bytes of 
videwu displuy memory 

Keyboard 

13M Selectric layout 

97 keys, including separate numeric key pad, 
cursor control cluster, $2 special function keys 


ald Isuluted edit/delete heys 
Uppercase indicator light 
Display Unie 


PRICE 


Iligh resolution (720 x 300 pixels) 


13) sin, color ofr 
monitor 


25 tine by 80 culumn format 


4 TIPC. Standard Configurations 


Texes Instruments Professione! Computer 


49 TIPPC 


green monochrome 


(Portable) 


PART REC. RETAIL 
Texas instruments Portable Professions! Computer 
Stendard Cenf i guret ions GA PaRT MCC. QETASL 
Aha unit 64%, 360K F logpy: 22230351-0005 83.995 Standerd Conf iguret ione 9A 
64% RAN. Expan. Card) Spee eee are 
teyooer 2230528-00 
Full nies 360K Floppy! 2223042-0002 Syetem unit 644%,360K Floppy. 2236664-000) | 94.925 
t2-tinch Baw CAT /centreiilers 2223046-0003 Bleck and White Monitor 
06-306 2.) 2239073-0001 640 RAM Expen. Card 2223237-0001 
° TRC Keyooerd Kit 2238685-0001 
TPC Half-nigh 360K 2237395-0001 
C8 20C "3-005 2.1 2239073-000) 
Syetem unit 66, 360K Floppy) 2223051-0005 94,993 pre 
wen. Card 3237-0001 
saaserai ; eesasracesel System unit 646,360K Flapey. 2230604-0004 96.070 
Pull Mign 360K Flosey: 2223042-0002 Colour Monitor econ 
13-inch Colteuwr CAT/eontreltier: 2223041-0008 64K RAM Expen. Card 22 
“6-608 2.1 2239073-000! TPC Keydoerd Kit 2238683-0001 
° TPC Helf-Hign 360K 2237393-0001 
RS-006 2.) 223906 73-006) 
eciSs2aNn ; 
Ccepy -6005 7.275 PC2S52n 
Coat et e323) 600i System unit 64K.360K Floppy. 2230684-000) 94.060 
epi peenali bed: Salih cae RANE gan cera 2223237-0008 
i2-tinch 8/4 CRT /Controiler: 2223046-000) TPC kK a ie 7ibkhs 6c: 
10%-eyte Winchester 6lek) 2223239-0002 Thc ol gepete a ae aeseses cunt 
2223099-0001 nche 
Serena renee 2239073-0001 2nG4K Chip Sete 2223099-000) 
06-608 2.1 "3-005 2.) 2239073-0001 
+ | 
Ages: Syston UNIT 641,360K Floppy, 2238684-0004 98.785 
Syetem wit 64¢.,360K F loppys 2223053 1-0005 94.275 a ices ° ° 
Gan RAN Expen. Cora 2223237-000) porary : eee aoe yaaneanat 
Keynes 6 5 2230528-000) MDaN . peter a onet 
t3-tncn Coleur CRAV/Controliiers 222)041-000% le eo eee cn et azpeees as 
160-wyte Winchester alehks 2223239-0002 vec ely ating Wineheeter az 2eeos 00 
anbe Crip tete 2223099-000) 264K @ Sete ° e001 
“8-006 2.1 2239673-0001 "B-006 2.1 22390673-0e00) 


SOFTEX SUPPLEMENT 


SOFTEX GOODIES 


SLIM LINE DISK DRIVES 


SOFTEX Special - 4 only available, National 
DS/DD Disk Drives for sale for $220.00 Bare 
Drive, $330.00 with External Power Supply and 
Cable. Postage $10.00. 


Chinon DS/DD Disk Drive now only $300.00 Bare 


Drive, $420.00 with External Power Supply = and 
Cables. Postage $10.00 


Also uvallable 1 "pre-loved" External Disk 
Drive, SS/DD, for $200.00 cuimplete with cabling, 


Contact SOFTEX for your Disk Drives for your new 
Corcomp Expansion System, we can. supply double 
power supplies too, contact us for a price, 


PRINTERS 


AMUST P88/2: Offers Pica/Elite Print, 
Proportional spacing, near letter quality 
printing and Standard printing up to 1!20cps. 

Price $490.00 plus $10.00 Postage. 


AMUST 80 DT/2:; A much more rugged printer than 


the 80-DT, comes with proportional space 
printing also. Speed up to 1[00cps. 
Special Price: $340.00 plus $10.00 Postage. 


BOOKS 


SOFTEX still has some copies of Home Comouter 
Magazine, Volume 4, Number 2 and Number 3 only 


for $5.00. 


Back coples of SOFTEX still available for $5.00 
each, includes Postage. 


Personal Professional Computers. This is the 


book to buy If you are wondering what a PC 


computer can do for you, it also helps you 
evaluate software available for them, giving 
some examples of differences between popular 
Word Processing, Data Base, Accounting, Project 
Management, Communications, and Speech Programs. 
A well written book giving the reader a complete 
basic understanding on the use of PC Computers. 
If you want to know more, then this is available 
from SOFTEX for $20.00, plus $1.00 postage. 


Introduction to Assembly Language for the TI 
Home Computer Price: $28.00 plus $2.00 Postage. 


Programs for the TI Home Computer. Price $24.00 
plus $2.00 Postage. 


TI PROFESSIONAL COMPUTER 


Texas Instruments have reduced prices 
substantially and this great system Is now 
available for less than you thought. Contact 
SOFTEX if you are thinking of up-grading, which 
could cost around $2000.00 if you have a full 


system, 


Prices range from under $4000.00 for 2 Dtsk 
Drives, a monitor, Keyboard and MS-DOS 2.1! to 
around $8000.00 for a !0M-byte Winchester, Color 
Monitor, 256K version. 


Try SOFTEX for w great Price for your Tl 
Professional. 


SOFTEX PROGRAMS 


SOFTEX now has an exciting Asseinbly Language 
gaine for sale, known as 'Brick-Bat', In this 
game you use the 'S' and 'D' keys to reflect a 
bouncing ball into a brick wall, demolishing It 

as you go. Very quick reflex actlon is required 

to succeed in this game. Available either 
Cassette based requiring Mini-Memory for $12.00 

or on Disk with Extended Basic and 32K memory 
for $15.00. In the case of the cassette version 

this program is loaded using the normal 'OLD 
CSI" routine. Go on, give this a try. 


Programs from tssues | to 3 of SOFTEX Magazine 
are now avallable on tape for $12.00 or Disk for 
$15.00, postage paid. This is the quick way to 
precure these programs without having to type 
them In, 


Finance Advisor Program is_ available on Disk 
only for $12.00 postage paid. This program 
considers all avenues of loans, repayments, and 
which type of interest is cheaper, together with 
@ tax prograin and budget. This program — will 
soon tell you wheather you can afford those 


extras you want. 


DATA BASE MANAGEMENT SYSTEM 


This program written in Assembly Language is 
fast, and allows up to 250 fields with 32000 
records (record size limited to 255 _ bytes). 
Comes as a Module and Disk, requires 32K memory, 
Disk Controller and Drive, and a RS232 interface 
with printer if output ts required. Can use 
TI-WRITER files for reports, allows up to 80 
character formatting, using automatic scrolling. 

Very easy to set up file structure, Reports can 
be modified easily to display Information 
required, Can be used for Membership and 
Malling Labels, Invoicing, Inventory and any of 
thousands of uses. A must for the serious user 
of the computer. SOFTEX Price: $105.00, P&P if 
applicable $5.00. 


Cartridge Expander. This lets you switch 
between 3 modules quickly without causing wear 
and tear on the Module port of your computer and 
saves you suffering from the dreadful curse of 
lock-up (see review Issue No. 3). Price: 
$60.00 plus $3.00 Postage. 


Homework Helper. This program is a simple way 
for a student to make notes of School 
assignments, coupled with a simple Word 
Processor. A new model coming out has a_ spell 
checker and a 12000 word dictionary. Requires 
32K Memory and Disk Drive. Price $60.00 plus 
$3.00 Postage. 


Astrology (Horoscope Maker). This produces 9 
different House system charts (see article in 
this issue) and calculates the precise location 

of each planet. Requires Disk and 32K memory. 
Price $70.00 plus $3.00 Postage. 


99/4A Auto Spell Check. Comes with a _ 20,000 
word dictionary, can utilize as many user 
dictlonartes required. Excellent Program, comes 

on 2 Disks, Price $59.95 plus $3.00 postage. 


New Australlan Disk Manager/Disk Fixer. This 
program is more than Disk Manager, or Disk 
Fixer, a real tool for Assembly Language. Price 
$39.95 plus $1.00 Postage. 


XIDEX DISKS 


XIDEX Disks available SS/DD $40.00 plus $2.00 
Postage for box of 10 Disks. 


SOFTEX SUPPLEMENT 


h 


DESCRIPTION 


The CHINON 5-1/4" floppy desk drve F-502 is a double-sided, double-density dnve wah a storage capacny of SOOK bytes, 
unformatted and 1s expandable to mcorporate up tu 4 drves The CHINON disk dives, akhough designed tor low cost, 1 
abo bust for high preasson, hagh quabty and hegh durabdty. All corcusts are megrated onto a single Gras! board. and the cor 
trol Gram mcorporates a CHINON designed custom LSI IC to contro! all LO signals, the head posdionsng step motor, the 


"| Spandie motor and the logec corcunts, to lower the number of parts allowing for a lower cost design. 


Expansion Box 
CHINON 5-1/4” FLOPPY DISK DRIVES 


KEY FEATURES 


® Pop-Up Mechanism 

@ Half-Height Size 

@ High Speed Data Access 

@ Ovect Drive Brushless Spindle Motor 
@ Low Power Consumption 

@ Simple Design 

@ Automatic Power-Down Conuul 

@ Plug Compaubility 


Chinon DS/DD Disk Drive now only $300.00 Bare 


Drive, $420.00 with External Power Supply and 
Cables. Postage $10.00 


18 Papp Mechantem SPECIFICATIONS 
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Corcomp Expansion System 


SOFTEX hopes to have the first shipment of the 
New CorComp 9900 Micro-Expansion System by late 
January 1985, This will include the RS323, 32K, 
and Double Density Disk Controller for an 
expected price of $595.00 plus $11.00 Postage. 


This system will require the use of Disk Drives 
with External Power. Softex suggests that your 
purchase a Double Slim = Line Power Supply and 
cabling for $180.00 so that you can add the 
second Drive later. Slim Line Disk Drives range 
from $220.00 (limited number only) to $300.00 


ea. 


If you are after a system then place your’ order 
now with Softex as_ they will be scarce for a 


time. 


CorComp Double Density Disk Controllers are 
available now for $295.00 plus $8.00 Postage. 


~ = ONSOLE 
/WRITER 


This . ? +6 ae rrr G 
ae your console into a word processor his new Word Processor is available for $70.00 


without disk-drive memory. With just your plus $3.00 Postage. 
console, a printer and this unique cartridge program 

you can begin word processing today. Features 

include a full screen text editor that lets you Insert 

and Delete characters and complete lines. The 

program is extremely easy to use yet powerful 

enough to handle most home word processing 

applications. 


SOFTEX SUBSCRIPTION 


SOFTEX MAGAZINE CAN ONLY CONTINUE IN PUBLICATION IF WE HAVE AN ASSURED NUMBER OF 
SUBSCRIBERS. 


EARLY RENEWAL OF SUBSCRIPTION WILL GREATLY ASSIST IN THE ASSURANCE OF THE FUTURE 
OF 


FS | Sean ee ne ee em eT 


ADDRE SS icacvah areoa-a ends Sasa eae 


SUBURB... cece ce eeee sceceseene seas 
STA Ve vuenere ee aca eo e 
POSTCODE. ..seeuee 
PLEASE ENROL ME FOR SIX FURTHER ISSUES OF SOFTEX MAGAZINE. | ENCLOSE 


CHEQUE/MONEY ORDER FOR $25.00 
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New Propuct: GRAPHX 


A new Australian graphics program with 
facilities like those of 'Macpaint', written in 
Assembly Language and is Menu and Function Key 


driven. 


Features include:- 

Free-hand drawing and erasing. 

A powerful zoom for close up work. 7 
Complete control over colours and ability to 


repaint parts of a picture. 


Pictures created can be printed out on _ your 
printer, see samples. - 
Portions of a picture may be ‘picked up and 


copied one or many times. 
Pictures may be saved _ to 
worked on later. 

A sophisticated circle facility allows circles 
and ellipses to be drawn very easily. 

Help information available on screen. 

A typewriter mode allowing the adding of text or 
labels to your graphics. 


disk, displayed or 


A clipboard facility lets you store parts of 
your picture or often used shapes or special 
alphabets for future use. 

A 48 page instruction manual. 

Equipment required: TI-99/4A Console, 32K 
Memory, | Disk Drive, a Joystick and_ either 
Editor/Assembler, Mini-Memory or Extended Basic 
modules. An RS232 and printer is required to 


print your graphics. 


Price: $50.00 plus $2.00 Postage. 


SOFTEX Price List 


PRINTERS Softex Price P&P 
AMUST DT-80/2, 100 cps. $340.00 FE 
AMUST DT100, 1!00cps $360.00 E 
AMUST P88-2,120 cps. $490.00 E 
BROTHER HR-15 (Centronic) $770.00 F 
BROTHER HR-15 (RS232) $810.00 F 
BROTHER HR-25 (Centronic) $1220.00 G 
BROTHER HR-25 (RS232) $1270.00 G 
BROTHER EP-44 $350.00 I: 
BROTHER HR-5 $280.00 KE 
TI 850 Printer $1010.00 G 
Tl 855 Printer $1300.00 G 
Misc., Monitors, etc 

Diskette Boxes, Modular (ea) $6.00 B 
DT!100S, Serial Card $125.00 D 
P88-2 Serial Card, 2K Buffer $125.00 D 
P88 PAR Parallel 4K buffer $125.00 D 
P88S Serial Card inc 2K Buffer $125.00 D 
GR1 Amust 12, 1!2in. Green Scr $199.00 E 
AME Amust 12, 22in. Taxan 

Amber Screen, Hi Res. $220.00 E 
Monitor Stand $35.00 D 
DT-80 Ribbon $12.95 B 
P88/2 Ribbon $20.00 B 
DT100 Ribbon $16.50 B 
DT80-2 Ribbon $12.95 B 
Centronics Printer Cable $40.00 A 
RS-232 Printer Cable —- ce .$40.00 A 
EP-44 Printer Cable $30.00 A 
C-62 Cassette Tape $1.50 A 
Shuttle Modems $266.00 1) 
Modem Cable $35.00 A 
Ext Disk Drive Cable- | Drive $25.00 A 
Ext Disk Drive Cable- 2 Drives $35.00 A 
Axiom ParallAx Interface $170.00 D 


Order which system you wish, ie.:- 


Mini-Memory (has larger clip 
Editor/Assembler 

Extended Basic 

All versions are same price. 


board 


y DRAWN 
BY 
GRAPHS 


DRAWN 
BY 
GRAPHX 


P&PRATES D $ 5.00 

E $10.00 
A $1.00  F $15.00 
i $2.00 G $20.00 
C $3.00 H $35.00 


Books 


Programns for the TI Home Comp. 
Introduction to Assembly Lang- 
age for the TI Home Computer 
Home Computer Mag.,vol 4,No.2 
Iiome Computer Mag.,Vol 4,No.3 
Personal/Professiona!l Computers 
-How they can help you? 


Disk Drives 


National Slimline, DS/DD 
Chinon Slimline, DS/DD | 
MPI B-52 Full size, DS/DD. 
Tandon TMI00-2, DS/DD 

Ext. Power Supply & cable 
Double Ext Pwr. Supply & cable 
Xidex SS/DD Disk, Box of 10 


software 


Brick-Bat Pgm. Cassette 
Brick-Bat Pgm. Disk 
Finance Advisor Pgm-Disk 
SOFTEX Pgms. Iss 1-3 Cass 
SOFTEX Pgms. Iss 1-3 Disk 
Cartridge Expander 
Data Base Management System 


Tl-Count General Ledger 
Th-Count Accounts Recelvable 
li-Count Accounts Payable 


Homework Helper 
Astrology-Horoscope 
99/4A Auto Spel l-Check 
Graphx 


a 


$24.00 


$28.00 
$5.00 
$5.00 


$20.00 


$220.00 
$300.00 
$386.00 
$386.00 
$120.00 
$180.00 

$40.00 


$12.00 
$15.00 
$12.00 
$12.00 
$15.00 


Sn | 00500 


$105.00 
$135.00 
$135.00 
$135.00 
$60.00 
$70.00 
$59.95 


facility) 


G 


> +> 
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C 
Cc 


$50.00 B 
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